(* Content-type: application/mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 7.0' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 145, 7] NotebookDataLength[ 325146, 7194] NotebookOptionsPosition[ 315697, 6880] NotebookOutlinePosition[ 316041, 6895] CellTagsIndexPosition[ 315998, 6892] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell["", "Subsection", CellChangeTimes->{{3.5020401548077917`*^9, 3.5020402154722614`*^9}}], Cell[BoxData[{ RowBox[{"Clear", "[", "\"\\"", "]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"BodePlot", "[", RowBox[{"\[CapitalPhi]_", ",", "f0_", ",", "fn_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", "\[Omega]", "}"}], ",", "\[IndentingNewLine]", RowBox[{"GraphicsColumn", "[", RowBox[{"{", RowBox[{ RowBox[{"LogLinearPlot", "[", RowBox[{ RowBox[{"20", "*", RowBox[{"Log10", "[", RowBox[{"Abs", "[", RowBox[{"\[CapitalPhi]", "/.", RowBox[{"{", RowBox[{"s", "\[Rule]", RowBox[{"I", "*", "\[Omega]"}]}], "}"}]}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"\[Omega]", ",", RowBox[{"10", "^", "f0"}], ",", RowBox[{"10", "^", "fn"}]}], "}"}], ",", RowBox[{"AxesOrigin", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"10", "^", "f0"}], ",", "0"}], "}"}]}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"LogLinearPlot", "[", RowBox[{ RowBox[{ RowBox[{"180", "/", "Pi"}], "*", RowBox[{"Arg", "[", RowBox[{"\[CapitalPhi]", "/.", RowBox[{"{", RowBox[{"s", "\[Rule]", RowBox[{"I", "*", "\[Omega]"}]}], "}"}]}], "]"}]}], ",", RowBox[{"{", RowBox[{"\[Omega]", ",", RowBox[{"10", "^", "f0"}], ",", RowBox[{"10", "^", "fn"}]}], "}"}], ",", RowBox[{"AxesOrigin", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"10", "^", "f0"}], ",", "0"}], "}"}]}]}], "]"}]}], "}"}], "]"}]}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Step", "[", RowBox[{"\[CapitalPhi]_", ",", "tn_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", "t", "}"}], ",", RowBox[{"Plot", "[", RowBox[{ RowBox[{"InverseLaplaceTransform", "[", RowBox[{ RowBox[{"\[CapitalPhi]", "/", "s"}], ",", "s", ",", "t"}], "]"}], ",", RowBox[{"{", RowBox[{"t", ",", "0", ",", "tn"}], "}"}]}], "]"}]}], "]"}]}]}], "Input", CellChangeTimes->{ 3.5020383204928746`*^9, 3.5020383853155823`*^9, {3.502038447725152*^9, 3.5020384481581764`*^9}, {3.502038520683325*^9, 3.5020386116205263`*^9}, { 3.5020387194796953`*^9, 3.5020387196727066`*^9}, {3.5020387559567814`*^9, 3.5020387808022027`*^9}, {3.502038819462414*^9, 3.5020388469689875`*^9}, { 3.5020388960057917`*^9, 3.502038944693577*^9}, {3.5020390832455015`*^9, 3.5020391573897424`*^9}, {3.5020391898936014`*^9, 3.502039229940892*^9}, { 3.502039261511698*^9, 3.5020392683440886`*^9}, {3.5020393732790904`*^9, 3.5020393828986406`*^9}, {3.502039475060912*^9, 3.5020394895847425`*^9}, { 3.502039594366736*^9, 3.502039653321108*^9}, {3.5020396835438366`*^9, 3.502039776385147*^9}, {3.5020398295641885`*^9, 3.502039834398465*^9}}] }, Open ]], Cell[CellGroupData[{ Cell["\<\ \:041c\:0430\:0442\:0440\:0438\:0446\:0430 \:043f\:0435\:0440\:0435\:0445\ \:043e\:0434\:0430 \:043c\:0435\:0436\:0434\:0443 \:0441\:0432\:044f\:0437\ \:0430\:043d\:043d\:043e\:0439 \:0438 \:043d\:043e\:0440\:043c\:0430\:043b\ \:044c\:043d\:043e\:0439 \:0421\:041a\ \>", "Subsection", CellChangeTimes->{{3.502039932303065*^9, 3.502039951958189*^9}}], Cell[BoxData[ RowBox[{ RowBox[{ SubscriptBox["A", "gb"], "=", RowBox[{"(", GridBox[{ { RowBox[{"Cos", "[", "\[Psi]", "]"}], "0", RowBox[{"-", RowBox[{"Sin", "[", "\[Psi]", "]"}]}]}, {"0", "1", "0"}, { RowBox[{"Sin", "[", "\[Psi]", "]"}], "0", RowBox[{"Cos", "[", "\[Psi]", "]"}]} }], ")"}]}], ";"}]], "Input"], Cell[BoxData[ RowBox[{ RowBox[{ SubscriptBox["B", "gb"], "=", RowBox[{"(", GridBox[{ { RowBox[{"Cos", "[", "\[CurlyTheta]", "]"}], RowBox[{"Sin", "[", "\[CurlyTheta]", "]"}], "0"}, { RowBox[{"-", RowBox[{"Sin", "[", "\[CurlyTheta]", "]"}]}], RowBox[{"Cos", "[", "\[CurlyTheta]", "]"}], "0"}, {"0", "0", "1"} }], ")"}]}], ";"}]], "Input", CellChangeTimes->{{3.502043616837808*^9, 3.502043624327236*^9}}], Cell[BoxData[ RowBox[{ RowBox[{ SubscriptBox["C", "gb"], "=", RowBox[{"(", GridBox[{ {"1", "0", "0"}, {"0", RowBox[{"Cos", "[", "\[Gamma]", "]"}], RowBox[{"Sin", "[", "\[Gamma]", "]"}]}, {"0", RowBox[{"-", RowBox[{"Sin", "[", "\[Gamma]", "]"}]}], RowBox[{"Cos", "[", "\[Gamma]", "]"}]} }], ")"}]}], ";"}]], "Input"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"MatrixForm", "[", RowBox[{ SubscriptBox["D", "gb"], "=", RowBox[{ SubscriptBox["C", "gb"], ".", SubscriptBox["B", "gb"], ".", SubscriptBox["A", "gb"]}]}], "]"}]], "Input"], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ { RowBox[{ RowBox[{"Cos", "[", "\[CurlyTheta]", "]"}], " ", RowBox[{"Cos", "[", "\[Psi]", "]"}]}], RowBox[{"Sin", "[", "\[CurlyTheta]", "]"}], RowBox[{ RowBox[{"-", RowBox[{"Cos", "[", "\[CurlyTheta]", "]"}]}], " ", RowBox[{"Sin", "[", "\[Psi]", "]"}]}]}, { RowBox[{ RowBox[{ RowBox[{"-", RowBox[{"Cos", "[", "\[Gamma]", "]"}]}], " ", RowBox[{"Cos", "[", "\[Psi]", "]"}], " ", RowBox[{"Sin", "[", "\[CurlyTheta]", "]"}]}], "+", RowBox[{ RowBox[{"Sin", "[", "\[Gamma]", "]"}], " ", RowBox[{"Sin", "[", "\[Psi]", "]"}]}]}], RowBox[{ RowBox[{"Cos", "[", "\[Gamma]", "]"}], " ", RowBox[{"Cos", "[", "\[CurlyTheta]", "]"}]}], RowBox[{ RowBox[{ RowBox[{"Cos", "[", "\[Psi]", "]"}], " ", RowBox[{"Sin", "[", "\[Gamma]", "]"}]}], "+", RowBox[{ RowBox[{"Cos", "[", "\[Gamma]", "]"}], " ", RowBox[{"Sin", "[", "\[CurlyTheta]", "]"}], " ", RowBox[{"Sin", "[", "\[Psi]", "]"}]}]}]}, { RowBox[{ RowBox[{ RowBox[{"Cos", "[", "\[Psi]", "]"}], " ", RowBox[{"Sin", "[", "\[Gamma]", "]"}], " ", RowBox[{"Sin", "[", "\[CurlyTheta]", "]"}]}], "+", RowBox[{ RowBox[{"Cos", "[", "\[Gamma]", "]"}], " ", RowBox[{"Sin", "[", "\[Psi]", "]"}]}]}], RowBox[{ RowBox[{"-", RowBox[{"Cos", "[", "\[CurlyTheta]", "]"}]}], " ", RowBox[{"Sin", "[", "\[Gamma]", "]"}]}], RowBox[{ RowBox[{ RowBox[{"Cos", "[", "\[Gamma]", "]"}], " ", RowBox[{"Cos", "[", "\[Psi]", "]"}]}], "-", RowBox[{ RowBox[{"Sin", "[", "\[Gamma]", "]"}], " ", RowBox[{"Sin", "[", "\[CurlyTheta]", "]"}], " ", RowBox[{"Sin", "[", "\[Psi]", "]"}]}]}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{3.5020400038181553`*^9, 3.502043640979189*^9, 3.5020437596069736`*^9, 3.502045165714399*^9, 3.5020518475865803`*^9, 3.502052064955013*^9, 3.5023556935766907`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"MatrixForm", "[", RowBox[{ SubscriptBox["D", "bg"], "=", RowBox[{"Transpose", "[", SubscriptBox["D", "gb"], "]"}]}], "]"}]], "Input"], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ { RowBox[{ RowBox[{"Cos", "[", "\[CurlyTheta]", "]"}], " ", RowBox[{"Cos", "[", "\[Psi]", "]"}]}], RowBox[{ RowBox[{ RowBox[{"-", RowBox[{"Cos", "[", "\[Gamma]", "]"}]}], " ", RowBox[{"Cos", "[", "\[Psi]", "]"}], " ", RowBox[{"Sin", "[", "\[CurlyTheta]", "]"}]}], "+", RowBox[{ RowBox[{"Sin", "[", "\[Gamma]", "]"}], " ", RowBox[{"Sin", "[", "\[Psi]", "]"}]}]}], RowBox[{ RowBox[{ RowBox[{"Cos", "[", "\[Psi]", "]"}], " ", RowBox[{"Sin", "[", "\[Gamma]", "]"}], " ", RowBox[{"Sin", "[", "\[CurlyTheta]", "]"}]}], "+", RowBox[{ RowBox[{"Cos", "[", "\[Gamma]", "]"}], " ", RowBox[{"Sin", "[", "\[Psi]", "]"}]}]}]}, { RowBox[{"Sin", "[", "\[CurlyTheta]", "]"}], RowBox[{ RowBox[{"Cos", "[", "\[Gamma]", "]"}], " ", RowBox[{"Cos", "[", "\[CurlyTheta]", "]"}]}], RowBox[{ RowBox[{"-", RowBox[{"Cos", "[", "\[CurlyTheta]", "]"}]}], " ", RowBox[{"Sin", "[", "\[Gamma]", "]"}]}]}, { RowBox[{ RowBox[{"-", RowBox[{"Cos", "[", "\[CurlyTheta]", "]"}]}], " ", RowBox[{"Sin", "[", "\[Psi]", "]"}]}], RowBox[{ RowBox[{ RowBox[{"Cos", "[", "\[Psi]", "]"}], " ", RowBox[{"Sin", "[", "\[Gamma]", "]"}]}], "+", RowBox[{ RowBox[{"Cos", "[", "\[Gamma]", "]"}], " ", RowBox[{"Sin", "[", "\[CurlyTheta]", "]"}], " ", RowBox[{"Sin", "[", "\[Psi]", "]"}]}]}], RowBox[{ RowBox[{ RowBox[{"Cos", "[", "\[Gamma]", "]"}], " ", RowBox[{"Cos", "[", "\[Psi]", "]"}]}], "-", RowBox[{ RowBox[{"Sin", "[", "\[Gamma]", "]"}], " ", RowBox[{"Sin", "[", "\[CurlyTheta]", "]"}], " ", RowBox[{"Sin", "[", "\[Psi]", "]"}]}]}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{3.502040028630574*^9, 3.5020436410331917`*^9, 3.502043759659977*^9, 3.502045165766402*^9, 3.502051847626582*^9, 3.5020520649980154`*^9, 3.502355693636694*^9}] }, Open ]], Cell[BoxData[{ RowBox[{ RowBox[{ SubscriptBox["C", "gb"], "=."}], ";", RowBox[{ SubscriptBox["B", "gb"], "=."}], ";", RowBox[{ SubscriptBox["A", "gb"], "=."}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ SubscriptBox["D", "gb"], "=", RowBox[{"ReplaceAll", "[", RowBox[{ SubscriptBox["D", "gb"], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Psi]", "\[Rule]", RowBox[{"\[Psi]", "[", "t", "]"}]}], ",", RowBox[{"\[CurlyTheta]", "\[Rule]", RowBox[{"\[CurlyTheta]", "[", "t", "]"}]}], ",", RowBox[{"\[Gamma]", "\[Rule]", RowBox[{"\[Gamma]", "[", "t", "]"}]}]}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ SubscriptBox["D", "bg"], "=", RowBox[{"ReplaceAll", "[", RowBox[{ SubscriptBox["D", "bg"], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Psi]", "\[Rule]", RowBox[{"\[Psi]", "[", "t", "]"}]}], ",", RowBox[{"\[CurlyTheta]", "\[Rule]", RowBox[{"\[CurlyTheta]", "[", "t", "]"}]}], ",", RowBox[{"\[Gamma]", "\[Rule]", RowBox[{"\[Gamma]", "[", "t", "]"}]}]}], "}"}]}], "]"}]}], ";"}]}], "Input", CellChangeTimes->{{3.502043736129631*^9, 3.502043750931478*^9}}] }, Closed]], Cell[CellGroupData[{ Cell["\<\ \:041c\:0430\:0442\:0440\:0438\:0446\:0430 \:043f\:0435\:0440\:0435\:0445\ \:043e\:0434\:0430 \:043c\:0435\:0436\:0434\:0443 \:0441\:0432\:044f\:0437\ \:0430\:043d\:043d\:043e\:0439 \:0438 \:0441\:043a\:043e\:0440\:043e\:0441\ \:0442\:043d\:043e\:0439 \:0421\:041a\ \>", "Subsection", CellChangeTimes->{{3.502040072733097*^9, 3.5020400799275084`*^9}}], Cell[BoxData[ RowBox[{ RowBox[{ SubscriptBox["A", "ab"], "=", RowBox[{"(", GridBox[{ { RowBox[{"Cos", "[", "\[Beta]", "]"}], "0", RowBox[{"-", RowBox[{"Sin", "[", "\[Beta]", "]"}]}]}, {"0", "1", "0"}, { RowBox[{"Sin", "[", "\[Beta]", "]"}], "0", RowBox[{"Cos", "[", "\[Beta]", "]"}]} }], ")"}]}], ";"}]], "Input"], Cell[BoxData[ RowBox[{" ", RowBox[{ RowBox[{ SubscriptBox["B", "ab"], "=", RowBox[{"(", GridBox[{ { RowBox[{"Cos", "[", "\[Alpha]", "]"}], RowBox[{"Sin", "[", "\[Alpha]", "]"}], "0"}, { RowBox[{"-", RowBox[{"Sin", "[", "\[Alpha]", "]"}]}], RowBox[{"Cos", "[", "\[Alpha]", "]"}], "0"}, {"0", "0", "1"} }], ")"}]}], ";"}]}]], "Input"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"MatrixForm", "[", RowBox[{ SubscriptBox["D", "ab"], "=", RowBox[{ SubscriptBox["B", "ab"], ".", SubscriptBox["A", "ab"]}]}], "]"}]], "Input"], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ { RowBox[{ RowBox[{"Cos", "[", "\[Alpha]", "]"}], " ", RowBox[{"Cos", "[", "\[Beta]", "]"}]}], RowBox[{"Sin", "[", "\[Alpha]", "]"}], RowBox[{ RowBox[{"-", RowBox[{"Cos", "[", "\[Alpha]", "]"}]}], " ", RowBox[{"Sin", "[", "\[Beta]", "]"}]}]}, { RowBox[{ RowBox[{"-", RowBox[{"Cos", "[", "\[Beta]", "]"}]}], " ", RowBox[{"Sin", "[", "\[Alpha]", "]"}]}], RowBox[{"Cos", "[", "\[Alpha]", "]"}], RowBox[{ RowBox[{"Sin", "[", "\[Alpha]", "]"}], " ", RowBox[{"Sin", "[", "\[Beta]", "]"}]}]}, { RowBox[{"Sin", "[", "\[Beta]", "]"}], "0", RowBox[{"Cos", "[", "\[Beta]", "]"}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{3.5020401189837427`*^9, 3.502043641152199*^9, 3.5020437597259808`*^9, 3.502045165838406*^9, 3.502051847680586*^9, 3.5020520650530186`*^9, 3.5023556937276993`*^9}] }, Open ]], Cell[BoxData[{ RowBox[{ RowBox[{ SubscriptBox["B", "ab"], "=."}], ";", RowBox[{ SubscriptBox["A", "ab"], "=."}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ SubscriptBox["D", "ab"], "=", RowBox[{"ReplaceAll", "[", RowBox[{ SubscriptBox["D", "ab"], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"\[Alpha]", "[", "t", "]"}]}], ",", " ", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"\[Beta]", "[", "t", "]"}]}]}], "}"}]}], "]"}]}], ";"}]}], "Input"] }, Closed]], Cell[CellGroupData[{ Cell["\<\ \:041c\:0430\:0442\:0440\:0438\:0446\:0430 \:043f\:0435\:0440\:0435\:0445\ \:043e\:0434\:0430 \:043c\:0435\:0436\:0434\:0443 \:0441\:0432\:044f\:0437\ \:0430\:043d\:043d\:043e\:0439 \:0438 \:043f\:043e\:043b\:0443\:0441\:0432\ \:044f\:0437\:0430\:043d\:043d\:043e\:0439 \:0421\:041a\ \>", "Subsection", CellChangeTimes->{{3.502040404533075*^9, 3.502040415409697*^9}}], Cell[BoxData[ RowBox[{ RowBox[{ SubscriptBox["D", "be"], "=", RowBox[{"(", GridBox[{ { RowBox[{"Cos", "[", RowBox[{"\[Alpha]", "[", "t", "]"}], "]"}], RowBox[{"-", RowBox[{"Sin", "[", RowBox[{"\[Alpha]", "[", "t", "]"}], "]"}]}], "0"}, { RowBox[{"Sin", "[", RowBox[{"\[Alpha]", "[", "t", "]"}], "]"}], RowBox[{"Cos", "[", RowBox[{"\[Alpha]", "[", "t", "]"}], "]"}], "0"}, {"0", "0", "1"} }], ")"}]}], ";"}]], "Input"] }, Closed]], Cell[CellGroupData[{ Cell["\<\ \:0414\:0438\:043d\:0430\:043c\:0438\:0447\:0435\:0441\:043a\:0438\:0435 \ \:0443\:0440\:0430\:0432\:043d\:0435\:043d\:0438\:044f \:043f\:043e\:0441\ \:0442\:0443\:043f\:0430\:0442\:0435\:043b\:044c\:043d\:043e\:0433\:043e \ \:0434\:0432\:0438\:0436\:0435\:043d\:0438\:044f \:0446\:0435\:043d\:0442\ \:0440\:0430 \:043c\:0430\:0441\:0441 \:041b\:0410\ \>", "Subsection", CellChangeTimes->{{3.497028750771304*^9, 3.4970287702114162`*^9}, { 3.4976275278262453`*^9, 3.49762755832699*^9}, {3.502040286810342*^9, 3.5020402876923923`*^9}}], Cell["\<\ \:0423\:0440\:0430\:0432\:043d\:0435\:043d\:0438\:044f \:0434\:0432\:0438\ \:0436\:0435\:043d\:0438\:044f \:0446\:0435\:043d\:0442\:0440\:0430 \:043c\ \:0430\:0441\:0441 \:041b\:0410 \:043f\:043e\:043b\:0443\:0447\:0438\:043c \ \:043d\:0430 \:043e\:0441\:043d\:043e\:0432\:0430\:043d\:0438\:0438 \:0437\ \:0430\:043a\:043e\:043d\:0430 \:0438\:0437\:043c\:0435\:043d\:0435\:043d\ \:0438\:044f \:043a\:043e\:043b\:0438\:0447\:0435\:0441\:0442\:0432\:0430 \ \:0434\:0432\:0438\:0436\:0435\:043d\:0438\:044f \:0446\:0435\:043d\:0442\ \:0440\:0430 \:043c\:0430\:0441\:0441:\ \>", "Text", CellChangeTimes->{{3.4970287996110973`*^9, 3.497028807421544*^9}}], Cell[BoxData[{ RowBox[{ RowBox[{ FractionBox[ RowBox[{"d", OverscriptBox["Q", "\[RightVector]"]}], "dt"], "=", RowBox[{ UnderscriptBox["\[CapitalSigma]", "i"], OverscriptBox[ SubscriptBox["F", "i"], "\[RightVector]"]}]}], ",", Cell[ ""]}], "\[IndentingNewLine]", RowBox[{ OverscriptBox["Q", "\[RightVector]"], "=", RowBox[{"m", OverscriptBox["V", "\[RightVector]"], RowBox[{Cell[""], "."}]}]}]}], "DisplayFormula", CellChangeTimes->{{3.4970288360761833`*^9, 3.4970288711681905`*^9}, { 3.4970289235171843`*^9, 3.497029176727667*^9}}], Cell[TextData[{ "\:041f\:0440\:043e\:0434\:0438\:0444\:0444\:0435\:0440\:0435\:043d\:0446\ \:0438\:0440\:0443\:0435\:043c ", Cell[BoxData[ FormBox[ OverscriptBox["V", "\[RightVector]"], TraditionalForm]]], " \:043f\:043e \:043f\:0440\:0430\:0432\:0438\:043b\:0430\:043c \:0434\:0438\ \:0444\:0444\:0435\:0440\:0435\:043d\:0446\:0438\:0440\:043e\:0432\:0430\:043d\ \:0438\:044f \:0432\:0435\:043a\:0442\:043e\:0440\:0430, \:0437\:0430\:043f\ \:0438\:0441\:0430\:043d\:043d\:043e\:0433\:043e \:0432 \:043f\:043e\:0434\ \:0432\:0438\:0436\:043d\:043e\:043c \:0431\:0430\:0437\:0438\:0441\:0435:" }], "Text", CellChangeTimes->{{3.497029879228848*^9, 3.4970299713371162`*^9}, { 3.4970300626133375`*^9, 3.497030080136339*^9}, {3.497030115523363*^9, 3.497030121444702*^9}}], Cell[BoxData[ RowBox[{ FractionBox[ RowBox[{"d", OverscriptBox["V", "\[RightVector]"]}], "dt"], "=", RowBox[{ FractionBox[ RowBox[{"d", OverscriptBox["V", "~"]}], "dt"], "+", RowBox[{ RowBox[{"(", RowBox[{ OverscriptBox["\[Omega]", "\[RightVector]"], "\[Cross]", OverscriptBox["V", "\[RightVector]"]}], ")"}], "."}]}]}]], "DisplayFormula", CellChangeTimes->{{3.4970301294291587`*^9, 3.4970301889245615`*^9}, { 3.4970303417083006`*^9, 3.497030344195443*^9}, {3.4970307313815885`*^9, 3.497030734154747*^9}}], Cell["\:0412\:043e\:0437\:0434\:0443\:0448\:043d\:0430\:044f \:0441\:043a\ \:043e\:0440\:043e\:0441\:0442\:044c:", "Text", CellChangeTimes->{{3.4976934595499587`*^9, 3.497693476897189*^9}, { 3.4976935847713766`*^9, 3.4976936323670597`*^9}, {3.5020405170845127`*^9, 3.502040528650174*^9}}], Cell[BoxData[ RowBox[{ RowBox[{ SubscriptBox["V", "a"], "=", RowBox[{"{", RowBox[{ RowBox[{"V", "[", "t", "]"}], ",", "0", ",", "0"}], "}"}]}], ";"}]], "Input", CellChangeTimes->{{3.5020405338504715`*^9, 3.502040555703721*^9}}], Cell["\<\ \:0412\:044b\:0440\:0430\:0437\:0438\:043c \:0441\:043a\:043e\:0440\:043e\ \:0441\:0442\:044c \:0432 \:0441\:0432\:044f\:0437\:0430\:043d\:043d\:043e\ \:0439 \:0421\:041a \:0447\:0435\:0440\:0435\:0437 \:0432\:043e\:0437\:0434\ \:0443\:0448\:043d\:0443\:044e:\ \>", "Text", CellChangeTimes->{{3.5020406283328753`*^9, 3.5020406489280534`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"MatrixForm", "[", RowBox[{ SubscriptBox["V", "b"], "=", RowBox[{ SubscriptBox["D", "ab"], ".", SubscriptBox["V", "a"]}]}], "]"}]], "Input", CellChangeTimes->{{3.502040623619606*^9, 3.502040624776672*^9}, { 3.502040655424425*^9, 3.5020406844570856`*^9}}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", TagBox[GridBox[{ { RowBox[{ RowBox[{"Cos", "[", RowBox[{"\[Alpha]", "[", "t", "]"}], "]"}], " ", RowBox[{"Cos", "[", RowBox[{"\[Beta]", "[", "t", "]"}], "]"}], " ", RowBox[{"V", "[", "t", "]"}]}]}, { RowBox[{ RowBox[{"-", RowBox[{"Cos", "[", RowBox[{"\[Beta]", "[", "t", "]"}], "]"}]}], " ", RowBox[{"Sin", "[", RowBox[{"\[Alpha]", "[", "t", "]"}], "]"}], " ", RowBox[{"V", "[", "t", "]"}]}]}, { RowBox[{ RowBox[{"Sin", "[", RowBox[{"\[Beta]", "[", "t", "]"}], "]"}], " ", RowBox[{"V", "[", "t", "]"}]}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.5599999999999999]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], Column], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{{3.5020406751365523`*^9, 3.5020406851691265`*^9}, 3.5020436412112026`*^9, 3.502043759797985*^9, 3.50204516590541*^9, 3.5020518477315884`*^9, 3.5020520651070213`*^9, 3.5023556938187046`*^9}] }, Open ]], Cell["\<\ \:0423\:0433\:043b\:043e\:0432\:0430\:044f \:0441\:043a\:043e\:0440\:043e\ \:0441\:0442\:044c \:0432\:0440\:0430\:0449\:0435\:043d\:0438\:044f \:041b\ \:0410 \:0432\:043e\:043a\:0440\:0443\:0433 \:0446\:0435\:043d\:0442\:0440\ \:0430 \:043c\:0430\:0441\:0441:\ \>", "Text", CellChangeTimes->{{3.4976268731147985`*^9, 3.4976269040075655`*^9}}], Cell[BoxData[ RowBox[{ RowBox[{ SubscriptBox["\[Omega]", "b"], "=", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[Omega]", "x"], "[", "t", "]"}], ",", RowBox[{ SubscriptBox["\[Omega]", "y"], "[", "t", "]"}], ",", RowBox[{ SubscriptBox["\[Omega]", "z"], "[", "t", "]"}]}], "}"}]}], ";"}]], "Input", CellChangeTimes->{{3.49762690933687*^9, 3.4976269463789887`*^9}, 3.4976270459936867`*^9, 3.4976273440647354`*^9, {3.4976327815997443`*^9, 3.4976327980326843`*^9}, {3.501821140959849*^9, 3.5018211563414755`*^9}}], Cell["\<\ \:0421\:0438\:043b\:0430 \:0442\:044f\:0436\:0435\:0441\:0442\:0438 \:0432 \ \:0431\:0430\:0437\:0438\:0441\:0435 \:043d\:043e\:0440\:043c\:0430\:043b\ \:044c\:043d\:043e\:0439 \:0441\:0438\:0441\:0442\:0435\:043c\:044b \:043a\ \:043e\:043e\:0440\:0434\:0438\:043d\:0430\:0442:\ \>", "Text", CellChangeTimes->{{3.4970292533660507`*^9, 3.497029278843508*^9}, { 3.5020408596081038`*^9, 3.5020408821943955`*^9}}], Cell[BoxData[ RowBox[{ RowBox[{ SubscriptBox["G", "g"], "=", RowBox[{"{", RowBox[{"0", ",", RowBox[{"-", "G"}], ",", "0"}], "}"}]}], ";"}]], "Input", CellChangeTimes->{{3.4970292967795343`*^9, 3.4970293377488775`*^9}, { 3.497627598640296*^9, 3.497627611898054*^9}, {3.4976311685684843`*^9, 3.4976311726597185`*^9}, {3.497633201285749*^9, 3.497633202625826*^9}, { 3.501903924590639*^9, 3.501903925546694*^9}}], Cell["\<\ \:0421\:0438\:043b\:0430 \:0442\:044f\:0433\:0438 \:0434\:0432\:0438\:0433\ \:0430\:0442\:0435\:043b\:044f \:0432 \:0431\:0430\:0437\:0438\:0441\:0435 \ \:0441\:0432\:044f\:0437\:0430\:043d\:043d\:043e\:0439 \:0441\:0438\:0441\ \:0442\:0435\:043c\:044b \:043a\:043e\:043e\:0440\:0434\:0438\:043d\:0430\ \:0442:\ \>", "Text", CellChangeTimes->{{3.497029378425204*^9, 3.4970293981673326`*^9}, { 3.497627775403406*^9, 3.497627796763628*^9}, {3.497627837603964*^9, 3.497627844363351*^9}, {3.497693726575624*^9, 3.497693731115232*^9}, { 3.49769376424969*^9, 3.4976938325310087`*^9}, {3.501903883295277*^9, 3.5019038940398912`*^9}, {3.502040912908152*^9, 3.5020409308991814`*^9}}], Cell[BoxData[ RowBox[{ RowBox[{ SubscriptBox["P", "b"], "=", RowBox[{"{", RowBox[{ RowBox[{"P", "*", RowBox[{"Cos", "[", SubscriptBox["\[Phi]", "p"], "]"}]}], ",", RowBox[{"P", "*", RowBox[{"Sin", "[", SubscriptBox["\[Phi]", "p"], "]"}]}], ",", "0"}], "}"}]}], ";"}]], "Input", CellChangeTimes->{{3.4970294238438015`*^9, 3.497029429704137*^9}, { 3.497083902452261*^9, 3.497083902530261*^9}, {3.497083934806717*^9, 3.4970839401419263`*^9}, {3.497084129713457*^9, 3.497084130134658*^9}, { 3.497084752747343*^9, 3.4970847529969435`*^9}, {3.497092540479322*^9, 3.497092583706997*^9}, {3.497627862205371*^9, 3.497627904508791*^9}, { 3.497631181478223*^9, 3.497631195159005*^9}, {3.497633206269034*^9, 3.497633207986132*^9}, {3.4976938374450173`*^9, 3.4976938570386515`*^9}, { 3.498284898781657*^9, 3.498284910103305*^9}, {3.4983014771816893`*^9, 3.498301509660946*^9}, {3.5019039025333776`*^9, 3.501903929206903*^9}}], Cell["\<\ \:0420\:0430\:0432\:043d\:043e\:0434\:0435\:0439\:0441\:0442\:0432\:0443\:044e\ \:0449\:0430\:044f \:0430\:044d\:0440\:043e\:0434\:0438\:043d\:0430\:043c\ \:0438\:0447\:0435\:0441\:043a\:0438\:0445 \:0441\:0438\:043b \:0432 \:0431\ \:0430\:0437\:0438\:0441\:0435 \:0441\:043a\:043e\:0440\:043e\:0441\:0442\ \:043d\:043e\:0439 \:0441\:0438\:0441\:0442\:0435\:043c\:044b:\ \>", "Text", CellChangeTimes->{{3.4970294452940283`*^9, 3.4970294558536325`*^9}, { 3.5020409548435507`*^9, 3.5020409653911543`*^9}}], Cell[BoxData[ RowBox[{ RowBox[{ SubscriptBox["R", "a"], "=", RowBox[{"{", RowBox[{ RowBox[{"-", "X"}], ",", "Y", ",", "Z"}], "}"}]}], ";"}]], "Input", CellChangeTimes->{{3.497029496394951*^9, 3.4970295125338745`*^9}, 3.4970841562335033`*^9, {3.497084236292843*^9, 3.49708434377703*^9}, { 3.497084496438896*^9, 3.497084508747318*^9}, {3.497090509449381*^9, 3.4970905519750547`*^9}, {3.4970907736826415`*^9, 3.497090779298651*^9}, { 3.4970912194222183`*^9, 3.497091236317048*^9}, {3.497091431410988*^9, 3.4970914402874036`*^9}, {3.4970917241766987`*^9, 3.4970917763587894`*^9}, {3.497092473399205*^9, 3.4970925323205075`*^9}, { 3.4970925878098044`*^9, 3.4970925887458057`*^9}, {3.4976279702065487`*^9, 3.4976279939839087`*^9}, {3.49763119908823*^9, 3.4976312035014825`*^9}, { 3.4976332118373528`*^9, 3.497633213328438*^9}, {3.4983015215793667`*^9, 3.4983015255573735`*^9}, {3.5019039322580776`*^9, 3.501903932900114*^9}, { 3.50204643014472*^9, 3.5020464570422583`*^9}}], Cell["\<\ \:0417\:0430\:043f\:0438\:0448\:0435\:043c \:0443\:0440\:0430\:0432\:043d\ \:0435\:043d\:0438\:0435 \:0432 \:0441\:0432\:044f\:0437\:0430\:043d\:043d\ \:043e\:0439 \:0421\:041a, \:0430 \:0437\:0430\:0442\:0435\:043c \:0441\:043f\ \:0440\:043e\:0435\:043a\:0442\:0438\:0440\:0443\:0435\:043c \:0432 \:043f\ \:043e\:043b\:0443\:0441\:0432\:044f\:0437\:0430\:043d\:043d\:0443\:044e:\ \>", "Text", CellChangeTimes->{{3.5020410119018145`*^9, 3.502041040650459*^9}}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"tm", "=", RowBox[{ RowBox[{"MatrixForm", "[", RowBox[{"Simplify", "[", RowBox[{"m", "*", RowBox[{ SubscriptBox["D", "be"], ".", RowBox[{"(", RowBox[{ RowBox[{"D", "[", RowBox[{ SubscriptBox["V", "b"], ",", "t"}], "]"}], "+", RowBox[{ SubscriptBox["\[Omega]", "b"], "\[Cross]", SubscriptBox["V", "b"]}]}], ")"}]}]}], "]"}], "]"}], "\[Equal]", RowBox[{"MatrixForm", "[", RowBox[{ RowBox[{"Expand", "[", RowBox[{"Simplify", "[", RowBox[{ SubscriptBox["D", "be"], ".", RowBox[{"(", RowBox[{ RowBox[{ SubscriptBox["D", "gb"], ".", SubscriptBox["G", "g"]}], "+", RowBox[{ SubscriptBox["D", "ab"], ".", SubscriptBox["R", "a"]}], "+", SubscriptBox["P", "b"]}], ")"}]}], "]"}], "]"}], "/.", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ RowBox[{"P", " ", RowBox[{"Cos", "[", SubscriptBox["\[Phi]", "p"], "]"}], " ", RowBox[{"Cos", "[", RowBox[{"\[Alpha]", "[", "t", "]"}], "]"}]}], "-", RowBox[{"P", " ", RowBox[{"Sin", "[", SubscriptBox["\[Phi]", "p"], "]"}], " ", RowBox[{"Sin", "[", RowBox[{"\[Alpha]", "[", "t", "]"}], "]"}]}]}], "\[Rule]", RowBox[{"P", " ", RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[Phi]", "p"], "+", RowBox[{"\[Alpha]", "[", "t", "]"}]}], "]"}]}]}], ",", RowBox[{ RowBox[{ RowBox[{"P", " ", RowBox[{"Cos", "[", RowBox[{"\[Alpha]", "[", "t", "]"}], "]"}], " ", RowBox[{"Sin", "[", SubscriptBox["\[Phi]", "p"], "]"}]}], "+", RowBox[{"P", " ", RowBox[{"Cos", "[", SubscriptBox["\[Phi]", "p"], "]"}], " ", RowBox[{"Sin", "[", RowBox[{"\[Alpha]", "[", "t", "]"}], "]"}]}]}], "\[Rule]", RowBox[{"P", " ", RowBox[{"Sin", "[", RowBox[{ SubscriptBox["\[Phi]", "p"], "+", RowBox[{"\[Alpha]", "[", "t", "]"}]}], "]"}]}]}]}], "}"}]}], "]"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Column", "[", RowBox[{"DYPD", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"tm", "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", RowBox[{ RowBox[{"tm", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}], "[", RowBox[{"[", "i", "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}]}], "]"}]}], "]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Clear", "[", "tm", "]"}], ";"}]}], "Input", CellChangeTimes->{ 3.4969419547660527`*^9, {3.49694202772738*^9, 3.496942076430665*^9}, { 3.496942125991951*^9, 3.4969421617472134`*^9}, 3.496942321912693*^9, { 3.496942370303977*^9, 3.4969423915200143`*^9}, {3.496942525149847*^9, 3.49694260703439*^9}, {3.49694265868608*^9, 3.496942844856805*^9}, { 3.49694310019805*^9, 3.4969431443929267`*^9}, {3.4969438984524417`*^9, 3.4969439069544563`*^9}, {3.4969439494489307`*^9, 3.496944169768115*^9}, { 3.49694423594343*^9, 3.4969442895139236`*^9}, {3.496944553076383*^9, 3.4969445555099874`*^9}, {3.496944698811837*^9, 3.4969448188228464`*^9}, { 3.4969448875253663`*^9, 3.496944941704261*^9}, {3.496944977428323*^9, 3.4969453296301374`*^9}, {3.4969454796087985`*^9, 3.496945593832198*^9}, { 3.497029302590866*^9, 3.497029325947202*^9}, 3.4970294059857802`*^9, { 3.497029616673831*^9, 3.497029824031691*^9}, 3.4970298545114346`*^9, { 3.497030360773391*^9, 3.4970303640875807`*^9}, {3.497030741453164*^9, 3.4970307908939924`*^9}, {3.497030825541974*^9, 3.4970308591378956`*^9}, { 3.4970308926418123`*^9, 3.497030960278681*^9}, {3.497030992458521*^9, 3.4970310894470687`*^9}, {3.497031479912402*^9, 3.497031489076926*^9}, { 3.497083325641255*^9, 3.497083339213279*^9}, {3.4970834530934772`*^9, 3.4970834644034967`*^9}, {3.497084843695502*^9, 3.4970848519323163`*^9}, { 3.497084965516114*^9, 3.497084969572121*^9}, {3.497085025326618*^9, 3.497085048711059*^9}, {3.49708561129484*^9, 3.497085712773017*^9}, { 3.497085758387497*^9, 3.497085785609544*^9}, {3.4970858157331963`*^9, 3.4970859148401694`*^9}, {3.497086003198724*^9, 3.49708603553758*^9}, { 3.49708607027884*^9, 3.497086292579228*^9}, {3.4970864555527124`*^9, 3.4970864767843494`*^9}, {3.4970866812851057`*^9, 3.4970867240603805`*^9}, {3.4970867614224453`*^9, 3.497086771890064*^9}, { 3.4970871812503777`*^9, 3.497087204915619*^9}, {3.4970872498280973`*^9, 3.4970873223214235`*^9}, {3.4976281859958906`*^9, 3.4976282862576256`*^9}, {3.497628499251808*^9, 3.497628553251897*^9}, 3.4976285862737856`*^9, 3.49763092302944*^9, {3.497631038833064*^9, 3.4976310474925594`*^9}, {3.497631077700287*^9, 3.497631130132286*^9}, { 3.497631226226782*^9, 3.49763123457926*^9}, {3.497633265689433*^9, 3.49763327892719*^9}, {3.4976334845069485`*^9, 3.4976335174208307`*^9}, { 3.497634495591779*^9, 3.4976344959317985`*^9}, {3.5018263025888486`*^9, 3.501826315458871*^9}, {3.501826398404216*^9, 3.5018264223970575`*^9}, { 3.5020410723982744`*^9, 3.502041237823736*^9}, {3.502041268815509*^9, 3.5020413471699905`*^9}}], Cell[BoxData[ TagBox[GridBox[{ { RowBox[{ RowBox[{"m", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"Cos", "[", RowBox[{"\[Beta]", "[", "t", "]"}], "]"}], " ", RowBox[{ SuperscriptBox["V", "\[Prime]", MultilineFunction->None], "[", "t", "]"}]}], "+", RowBox[{ RowBox[{"Sin", "[", RowBox[{"\[Beta]", "[", "t", "]"}], "]"}], " ", RowBox[{"V", "[", "t", "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"Sin", "[", RowBox[{"\[Alpha]", "[", "t", "]"}], "]"}], " ", RowBox[{ SubscriptBox["\[Omega]", "x"], "[", "t", "]"}]}], "+", RowBox[{ RowBox[{"Cos", "[", RowBox[{"\[Alpha]", "[", "t", "]"}], "]"}], " ", RowBox[{ SubscriptBox["\[Omega]", "y"], "[", "t", "]"}]}], "-", RowBox[{ SuperscriptBox["\[Beta]", "\[Prime]", MultilineFunction->None], "[", "t", "]"}]}], ")"}]}]}], ")"}]}], "\[Equal]", RowBox[{ RowBox[{"P", " ", RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[Phi]", "p"], "+", RowBox[{"\[Alpha]", "[", "t", "]"}]}], "]"}]}], "-", RowBox[{"X", " ", RowBox[{"Cos", "[", RowBox[{"\[Beta]", "[", "t", "]"}], "]"}]}], "+", RowBox[{"G", " ", RowBox[{"Cos", "[", RowBox[{"\[Gamma]", "[", "t", "]"}], "]"}], " ", RowBox[{"Cos", "[", RowBox[{"\[CurlyTheta]", "[", "t", "]"}], "]"}], " ", RowBox[{"Sin", "[", RowBox[{"\[Alpha]", "[", "t", "]"}], "]"}]}], "-", RowBox[{"Z", " ", RowBox[{"Sin", "[", RowBox[{"\[Beta]", "[", "t", "]"}], "]"}]}], "-", RowBox[{"G", " ", RowBox[{"Cos", "[", RowBox[{"\[Alpha]", "[", "t", "]"}], "]"}], " ", RowBox[{"Sin", "[", RowBox[{"\[CurlyTheta]", "[", "t", "]"}], "]"}]}]}]}]}, { RowBox[{ RowBox[{"m", " ", RowBox[{"V", "[", "t", "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{"Cos", "[", RowBox[{"\[Alpha]", "[", "t", "]"}], "]"}]}], " ", RowBox[{"Sin", "[", RowBox[{"\[Beta]", "[", "t", "]"}], "]"}], " ", RowBox[{ SubscriptBox["\[Omega]", "x"], "[", "t", "]"}]}], "+", RowBox[{ RowBox[{"Sin", "[", RowBox[{"\[Alpha]", "[", "t", "]"}], "]"}], " ", RowBox[{"Sin", "[", RowBox[{"\[Beta]", "[", "t", "]"}], "]"}], " ", RowBox[{ SubscriptBox["\[Omega]", "y"], "[", "t", "]"}]}], "+", RowBox[{ RowBox[{"Cos", "[", RowBox[{"\[Beta]", "[", "t", "]"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{ SubscriptBox["\[Omega]", "z"], "[", "t", "]"}], "-", RowBox[{ SuperscriptBox["\[Alpha]", "\[Prime]", MultilineFunction->None], "[", "t", "]"}]}], ")"}]}]}], ")"}]}], "\[Equal]", RowBox[{"Y", "-", RowBox[{"G", " ", RowBox[{"Cos", "[", RowBox[{"\[Alpha]", "[", "t", "]"}], "]"}], " ", RowBox[{"Cos", "[", RowBox[{"\[Gamma]", "[", "t", "]"}], "]"}], " ", RowBox[{"Cos", "[", RowBox[{"\[CurlyTheta]", "[", "t", "]"}], "]"}]}], "+", RowBox[{"P", " ", RowBox[{"Sin", "[", RowBox[{ SubscriptBox["\[Phi]", "p"], "+", RowBox[{"\[Alpha]", "[", "t", "]"}]}], "]"}]}], "-", RowBox[{"G", " ", RowBox[{"Sin", "[", RowBox[{"\[Alpha]", "[", "t", "]"}], "]"}], " ", RowBox[{"Sin", "[", RowBox[{"\[CurlyTheta]", "[", "t", "]"}], "]"}]}]}]}]}, { RowBox[{ RowBox[{"m", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"Sin", "[", RowBox[{"\[Beta]", "[", "t", "]"}], "]"}], " ", RowBox[{ SuperscriptBox["V", "\[Prime]", MultilineFunction->None], "[", "t", "]"}]}], "-", RowBox[{ RowBox[{"Cos", "[", RowBox[{"\[Beta]", "[", "t", "]"}], "]"}], " ", RowBox[{"V", "[", "t", "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"Sin", "[", RowBox[{"\[Alpha]", "[", "t", "]"}], "]"}], " ", RowBox[{ SubscriptBox["\[Omega]", "x"], "[", "t", "]"}]}], "+", RowBox[{ RowBox[{"Cos", "[", RowBox[{"\[Alpha]", "[", "t", "]"}], "]"}], " ", RowBox[{ SubscriptBox["\[Omega]", "y"], "[", "t", "]"}]}], "-", RowBox[{ SuperscriptBox["\[Beta]", "\[Prime]", MultilineFunction->None], "[", "t", "]"}]}], ")"}]}]}], ")"}]}], "\[Equal]", RowBox[{ RowBox[{"Z", " ", RowBox[{"Cos", "[", RowBox[{"\[Beta]", "[", "t", "]"}], "]"}]}], "-", RowBox[{"X", " ", RowBox[{"Sin", "[", RowBox[{"\[Beta]", "[", "t", "]"}], "]"}]}], "+", RowBox[{"G", " ", RowBox[{"Cos", "[", RowBox[{"\[CurlyTheta]", "[", "t", "]"}], "]"}], " ", RowBox[{"Sin", "[", RowBox[{"\[Gamma]", "[", "t", "]"}], "]"}]}]}]}]} }, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]], "Output", CellChangeTimes->{ 3.50182642383226*^9, 3.501826499164791*^9, 3.501903367776791*^9, 3.501907369946702*^9, {3.502041178832362*^9, 3.5020412106591825`*^9}, 3.5020413494751225`*^9, 3.502043641713231*^9, 3.5020437603830185`*^9, 3.5020451664294395`*^9, 3.5020518482416177`*^9, 3.5020520656110506`*^9, 3.502355694457741*^9}] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell["\<\ \:0412\:0430\:0440\:044c\:0438\:0440\:043e\:0432\:0430\:043d\:0438\:0435 \ \:0443\:0440\:0430\:0432\:043d\:0435\:043d\:0438\:044f \:043a\:0430\:0441\ \:0430\:0442\:0435\:043b\:044c\:043d\:044b\:0445 \:0441\:0438\:043b\ \>", "Subsection", CellChangeTimes->{{3.5020414164579535`*^9, 3.5020414241833954`*^9}, { 3.502041489926156*^9, 3.5020415213969555`*^9}, {3.5020416168654165`*^9, 3.50204162462386*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"UKS", "=", RowBox[{"DYPD", "[", RowBox[{"[", "1", "]"}], "]"}]}]], "Input", CellChangeTimes->{{3.5020414327468853`*^9, 3.5020414406883397`*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"m", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"Cos", "[", RowBox[{"\[Beta]", "[", "t", "]"}], "]"}], " ", RowBox[{ SuperscriptBox["V", "\[Prime]", MultilineFunction->None], "[", "t", "]"}]}], "+", RowBox[{ RowBox[{"Sin", "[", RowBox[{"\[Beta]", "[", "t", "]"}], "]"}], " ", RowBox[{"V", "[", "t", "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"Sin", "[", RowBox[{"\[Alpha]", "[", "t", "]"}], "]"}], " ", RowBox[{ SubscriptBox["\[Omega]", "x"], "[", "t", "]"}]}], "+", RowBox[{ RowBox[{"Cos", "[", RowBox[{"\[Alpha]", "[", "t", "]"}], "]"}], " ", RowBox[{ SubscriptBox["\[Omega]", "y"], "[", "t", "]"}]}], "-", RowBox[{ SuperscriptBox["\[Beta]", "\[Prime]", MultilineFunction->None], "[", "t", "]"}]}], ")"}]}]}], ")"}]}], "\[Equal]", RowBox[{ RowBox[{"P", " ", RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[Phi]", "p"], "+", RowBox[{"\[Alpha]", "[", "t", "]"}]}], "]"}]}], "-", RowBox[{"X", " ", RowBox[{"Cos", "[", RowBox[{"\[Beta]", "[", "t", "]"}], "]"}]}], "+", RowBox[{"G", " ", RowBox[{"Cos", "[", RowBox[{"\[Gamma]", "[", "t", "]"}], "]"}], " ", RowBox[{"Cos", "[", RowBox[{"\[CurlyTheta]", "[", "t", "]"}], "]"}], " ", RowBox[{"Sin", "[", RowBox[{"\[Alpha]", "[", "t", "]"}], "]"}]}], "-", RowBox[{"Z", " ", RowBox[{"Sin", "[", RowBox[{"\[Beta]", "[", "t", "]"}], "]"}]}], "-", RowBox[{"G", " ", RowBox[{"Cos", "[", RowBox[{"\[Alpha]", "[", "t", "]"}], "]"}], " ", RowBox[{"Sin", "[", RowBox[{"\[CurlyTheta]", "[", "t", "]"}], "]"}]}]}]}]], "Output", CellChangeTimes->{3.5020414414293823`*^9, 3.5020436417582335`*^9, 3.502043760429021*^9, 3.502045166473442*^9, 3.50205184828162*^9, 3.5020520656560526`*^9, 3.5023556945237446`*^9}] }, Open ]], Cell[TextData[{ "\:0418\:0441\:0445\:043e\:0434\:043d\:043e\:0435 \:043e\:0441\:043d\:043e\ \:0432\:043d\:043e\:0435 \:0434\:0432\:0438\:0436\:0435\:043d\:0438\:0435 - \ \:041f\:0413\:041f:\n", Cell[BoxData[ FormBox[ SubscriptBox["V", "0"], TraditionalForm]], FormatType->"TraditionalForm"], "=const; ", Cell[BoxData[ FormBox[ RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[Omega]", "x0"], "=", "0"}], ";"}], " "}], TraditionalForm]], FormatType->"TraditionalForm"], Cell[BoxData[ FormBox[ RowBox[{ RowBox[{ SubscriptBox["\[Omega]", "y0"], "=", "0"}], ";"}], TraditionalForm]]], " ", Cell[BoxData[ FormBox[ RowBox[{ RowBox[{ SubscriptBox["\[Omega]", "z0"], "=", "0"}], ";"}], TraditionalForm]]], " ", Cell[BoxData[ FormBox[ RowBox[{ RowBox[{ SubscriptBox["\[Beta]", "0"], "=", "0"}], ";", " ", RowBox[{ SubscriptBox["\[Gamma]", "0"], "=", "0"}], ";", " ", RowBox[{ SubscriptBox["Z", "0"], "=", "0"}], ";"}], TraditionalForm]], FormatType->"TraditionalForm"] }], "Text", CellChangeTimes->{{3.50204163563449*^9, 3.502041665699209*^9}, { 3.502042536667026*^9, 3.5020425680468206`*^9}, {3.502042621772894*^9, 3.5020427591487513`*^9}, {3.5020429226361017`*^9, 3.5020429420322113`*^9}, {3.5020431119769316`*^9, 3.502043113989047*^9}, 3.5020438668651085`*^9}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"IOD", "=", RowBox[{"UKS", "/.", RowBox[{"{", RowBox[{ RowBox[{"V", "\[Rule]", SubscriptBox["V", "0"]}], ",", RowBox[{"\[Beta]", "\[Rule]", SubscriptBox["\[Beta]", "0"]}], ",", RowBox[{"\[Alpha]", "\[Rule]", SubscriptBox["\[Alpha]", "0"]}], ",", RowBox[{"\[Gamma]", "\[Rule]", SubscriptBox["\[Gamma]", "0"]}], ",", RowBox[{"\[CurlyTheta]", "\[Rule]", SubscriptBox["\[CurlyTheta]", "0"]}], ",", RowBox[{ SubscriptBox["\[Omega]", "x"], "->", SubscriptBox["\[Omega]", "x0"]}], ",", RowBox[{ SubscriptBox["\[Omega]", "y"], "->", SubscriptBox["\[Omega]", "y0"]}], ",", RowBox[{"P", "\[Rule]", SubscriptBox["P", "0"]}], ",", RowBox[{"X", "\[Rule]", SubscriptBox["X", "0"]}], ",", RowBox[{"Z", "\[Rule]", SubscriptBox["Z", "0"]}]}], "}"}]}]}]], "Input", CellChangeTimes->{{3.502041670675494*^9, 3.502041676669837*^9}, 3.5020424718213167`*^9, {3.5020427916396093`*^9, 3.5020429026939616`*^9}, { 3.5020429619263496`*^9, 3.502042989432923*^9}, {3.502043028464155*^9, 3.502043032103363*^9}, {3.502043676030194*^9, 3.502043678307324*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"m", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[Beta]", "0"], "[", "t", "]"}], "]"}], " ", RowBox[{ SuperscriptBox[ RowBox[{"(", SubscriptBox["V", "0"], ")"}], "\[Prime]", MultilineFunction->None], "[", "t", "]"}]}], "+", RowBox[{ RowBox[{"Sin", "[", RowBox[{ SubscriptBox["\[Beta]", "0"], "[", "t", "]"}], "]"}], " ", RowBox[{ SubscriptBox["V", "0"], "[", "t", "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"Sin", "[", RowBox[{ SubscriptBox["\[Alpha]", "0"], "[", "t", "]"}], "]"}], " ", RowBox[{ SubscriptBox["\[Omega]", "x0"], "[", "t", "]"}]}], "+", RowBox[{ RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[Alpha]", "0"], "[", "t", "]"}], "]"}], " ", RowBox[{ SubscriptBox["\[Omega]", "y0"], "[", "t", "]"}]}], "-", RowBox[{ SuperscriptBox[ RowBox[{"(", SubscriptBox["\[Beta]", "0"], ")"}], "\[Prime]", MultilineFunction->None], "[", "t", "]"}]}], ")"}]}]}], ")"}]}], "\[Equal]", RowBox[{ RowBox[{"G", " ", RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[Gamma]", "0"], "[", "t", "]"}], "]"}], " ", RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[CurlyTheta]", "0"], "[", "t", "]"}], "]"}], " ", RowBox[{"Sin", "[", RowBox[{ SubscriptBox["\[Alpha]", "0"], "[", "t", "]"}], "]"}]}], "-", RowBox[{"G", " ", RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[Alpha]", "0"], "[", "t", "]"}], "]"}], " ", RowBox[{"Sin", "[", RowBox[{ SubscriptBox["\[CurlyTheta]", "0"], "[", "t", "]"}], "]"}]}], "+", RowBox[{ RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[Phi]", "p"], "+", RowBox[{ SubscriptBox["\[Alpha]", "0"], "[", "t", "]"}]}], "]"}], " ", SubscriptBox["P", "0"]}], "-", RowBox[{ RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[Beta]", "0"], "[", "t", "]"}], "]"}], " ", SubscriptBox["X", "0"]}], "-", RowBox[{ RowBox[{"Sin", "[", RowBox[{ SubscriptBox["\[Beta]", "0"], "[", "t", "]"}], "]"}], " ", SubscriptBox["Z", "0"]}]}]}]], "Output", CellChangeTimes->{3.5020465041179514`*^9, 3.502051848324622*^9, 3.5020520657110558`*^9, 3.502355694558747*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"IOD", "=", RowBox[{ RowBox[{"IOD", "/.", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ SuperscriptBox[ RowBox[{"(", SubscriptBox["V", "0"], ")"}], "\[Prime]", MultilineFunction->None], "[", "t", "]"}], "\[Rule]", "0"}], ",", RowBox[{ RowBox[{ SubscriptBox["\[Beta]", "0"], "[", "t", "]"}], "\[Rule]", "0"}], ",", RowBox[{ RowBox[{ SubscriptBox["\[Gamma]", "0"], "[", "t", "]"}], "\[Rule]", "0"}], ",", RowBox[{ RowBox[{ SubscriptBox["\[Omega]", "x0"], "[", "t", "]"}], "\[Rule]", "0"}], ",", RowBox[{ RowBox[{ SubscriptBox["\[Omega]", "y0"], "[", "t", "]"}], "\[Rule]", "0"}], ",", RowBox[{ SubscriptBox["Z", "0"], "\[Rule]", "0"}]}], "}"}]}], "/.", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"G", " ", RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[CurlyTheta]", "0"], "[", "t", "]"}], "]"}], " ", RowBox[{"Sin", "[", RowBox[{ SubscriptBox["\[Alpha]", "0"], "[", "t", "]"}], "]"}]}], "-", RowBox[{"G", " ", RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[Alpha]", "0"], "[", "t", "]"}], "]"}], " ", RowBox[{"Sin", "[", RowBox[{ SubscriptBox["\[CurlyTheta]", "0"], "[", "t", "]"}], "]"}]}]}], "\[Rule]", RowBox[{"G", " ", RowBox[{"Sin", "[", RowBox[{ RowBox[{ SubscriptBox["\[Alpha]", "0"], "[", "t", "]"}], "-", RowBox[{ SubscriptBox["\[CurlyTheta]", "0"], "[", "t", "]"}]}], "]"}]}]}], "}"}]}]}]], "Input", CellChangeTimes->{{3.502043041623908*^9, 3.502043192477536*^9}, 3.5020436370009613`*^9, {3.5020436846446867`*^9, 3.502043688830926*^9}, { 3.502044124192827*^9, 3.5020441942798357`*^9}, {3.5020442351871758`*^9, 3.5020442736463757`*^9}, {3.502046478278473*^9, 3.502046478812504*^9}}], Cell[BoxData[ RowBox[{"0", "\[Equal]", RowBox[{ RowBox[{"G", " ", RowBox[{"Sin", "[", RowBox[{ RowBox[{ SubscriptBox["\[Alpha]", "0"], "[", "t", "]"}], "-", RowBox[{ SubscriptBox["\[CurlyTheta]", "0"], "[", "t", "]"}]}], "]"}]}], "+", RowBox[{ RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[Phi]", "p"], "+", RowBox[{ SubscriptBox["\[Alpha]", "0"], "[", "t", "]"}]}], "]"}], " ", SubscriptBox["P", "0"]}], "-", SubscriptBox["X", "0"]}]}]], "Output", CellChangeTimes->{3.5020442776056023`*^9, 3.5020451667034554`*^9, 3.5020465053450212`*^9, 3.502051848371625*^9, 3.502052065757059*^9, 3.5023556945917487`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"IOD", "=", RowBox[{"IOD", "/.", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[Alpha]", "0"], "[", "t", "]"}], "-", RowBox[{ SubscriptBox["\[CurlyTheta]", "0"], "[", "t", "]"}]}], "\[Rule]", RowBox[{ SubscriptBox["\[Theta]", "0"], "[", "t", "]"}]}], "}"}]}]}]], "Input", CellChangeTimes->{ 3.5020435184731817`*^9, {3.5020436128605804`*^9, 3.502043631074622*^9}, { 3.5020437016426587`*^9, 3.5020437134263325`*^9}, {3.5020437699435654`*^9, 3.502043782347275*^9}}], Cell[BoxData[ RowBox[{"0", "\[Equal]", RowBox[{ RowBox[{"G", " ", RowBox[{"Sin", "[", RowBox[{ SubscriptBox["\[Theta]", "0"], "[", "t", "]"}], "]"}]}], "+", RowBox[{ RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[Phi]", "p"], "+", RowBox[{ SubscriptBox["\[Alpha]", "0"], "[", "t", "]"}]}], "]"}], " ", SubscriptBox["P", "0"]}], "-", SubscriptBox["X", "0"]}]}]], "Output", CellChangeTimes->{3.5020437829493093`*^9, 3.5020442837899556`*^9, 3.5020451667554584`*^9, 3.502046506320077*^9, 3.5020518484116273`*^9, 3.502052065802061*^9, 3.5023556946257505`*^9}] }, Open ]], Cell["\:0418\:0441\:0445\:043e\:0434\:043d\:043e\:0435 \:0432\:043e\:0437\ \:043c\:0443\:0449\:0435\:043d\:043d\:043e\:0435 \:0434\:0432\:0438\:0436\ \:0435\:043d\:0438\:0435:", "Text", CellChangeTimes->{{3.502043888500346*^9, 3.5020439198711405`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"IVD", "=", RowBox[{"UKS", "/.", RowBox[{"{", RowBox[{ RowBox[{"V", "\[Rule]", SubscriptBox["V", "1"]}], ",", RowBox[{"\[Beta]", "\[Rule]", SubscriptBox["\[Beta]", "1"]}], ",", RowBox[{"\[Alpha]", "\[Rule]", SubscriptBox["\[Alpha]", "1"]}], ",", RowBox[{"\[Gamma]", "\[Rule]", SubscriptBox["\[Gamma]", "1"]}], ",", RowBox[{"\[CurlyTheta]", "\[Rule]", SubscriptBox["\[CurlyTheta]", "1"]}], ",", RowBox[{ SubscriptBox["\[Omega]", "x"], "->", SubscriptBox["\[Omega]", "x1"]}], ",", RowBox[{ SubscriptBox["\[Omega]", "y"], "->", SubscriptBox["\[Omega]", "y1"]}], ",", RowBox[{"P", "\[Rule]", SubscriptBox["P", "1"]}], ",", RowBox[{"X", "\[Rule]", SubscriptBox["X", "1"]}], ",", RowBox[{"Z", "\[Rule]", SubscriptBox["Z", "1"]}]}], "}"}]}]}]], "Input", CellChangeTimes->{{3.5020439246424136`*^9, 3.502043970462034*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"m", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[Beta]", "1"], "[", "t", "]"}], "]"}], " ", RowBox[{ SuperscriptBox[ RowBox[{"(", SubscriptBox["V", "1"], ")"}], "\[Prime]", MultilineFunction->None], "[", "t", "]"}]}], "+", RowBox[{ RowBox[{"Sin", "[", RowBox[{ SubscriptBox["\[Beta]", "1"], "[", "t", "]"}], "]"}], " ", RowBox[{ SubscriptBox["V", "1"], "[", "t", "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"Sin", "[", RowBox[{ SubscriptBox["\[Alpha]", "1"], "[", "t", "]"}], "]"}], " ", RowBox[{ SubscriptBox["\[Omega]", "x1"], "[", "t", "]"}]}], "+", RowBox[{ RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[Alpha]", "1"], "[", "t", "]"}], "]"}], " ", RowBox[{ SubscriptBox["\[Omega]", "y1"], "[", "t", "]"}]}], "-", RowBox[{ SuperscriptBox[ RowBox[{"(", SubscriptBox["\[Beta]", "1"], ")"}], "\[Prime]", MultilineFunction->None], "[", "t", "]"}]}], ")"}]}]}], ")"}]}], "\[Equal]", RowBox[{ RowBox[{"G", " ", RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[Gamma]", "1"], "[", "t", "]"}], "]"}], " ", RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[CurlyTheta]", "1"], "[", "t", "]"}], "]"}], " ", RowBox[{"Sin", "[", RowBox[{ SubscriptBox["\[Alpha]", "1"], "[", "t", "]"}], "]"}]}], "-", RowBox[{"G", " ", RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[Alpha]", "1"], "[", "t", "]"}], "]"}], " ", RowBox[{"Sin", "[", RowBox[{ SubscriptBox["\[CurlyTheta]", "1"], "[", "t", "]"}], "]"}]}], "+", RowBox[{ RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[Phi]", "p"], "+", RowBox[{ SubscriptBox["\[Alpha]", "1"], "[", "t", "]"}]}], "]"}], " ", SubscriptBox["P", "1"]}], "-", RowBox[{ RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[Beta]", "1"], "[", "t", "]"}], "]"}], " ", SubscriptBox["X", "1"]}], "-", RowBox[{ RowBox[{"Sin", "[", RowBox[{ SubscriptBox["\[Beta]", "1"], "[", "t", "]"}], "]"}], " ", SubscriptBox["Z", "1"]}]}]}]], "Output", CellChangeTimes->{3.5020462718926687`*^9, 3.502046508657211*^9, 3.502046569555694*^9, 3.502050421400007*^9, 3.5020504539008656`*^9, 3.50205184845763*^9, 3.5020520659900723`*^9, 3.5023556946617527`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"IVD", "=", RowBox[{"IVD", "/.", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ SuperscriptBox[ RowBox[{"(", SubscriptBox["V", "1"], ")"}], "\[Prime]", MultilineFunction->None], "[", "t", "]"}], "\[Rule]", RowBox[{ RowBox[{ RowBox[{"(", "\[CapitalDelta]V", ")"}], "'"}], "[", "t", "]"}]}], ",", RowBox[{ SubscriptBox["\[Beta]", "1"], "\[Rule]", "\[CapitalDelta]\[Beta]"}], ",", RowBox[{ SubscriptBox["\[Gamma]", "1"], "\[Rule]", "\[CapitalDelta]\[Gamma]"}]}], "}"}]}]}]], "Input", CellChangeTimes->{{3.502046213210312*^9, 3.5020462210327597`*^9}, { 3.5020462674904165`*^9, 3.502046268398469*^9}, {3.502046387954307*^9, 3.5020463885993443`*^9}, {3.502046514080521*^9, 3.5020465668845415`*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"m", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"Cos", "[", RowBox[{"\[CapitalDelta]\[Beta]", "[", "t", "]"}], "]"}], " ", RowBox[{ SuperscriptBox["\[CapitalDelta]V", "\[Prime]", MultilineFunction->None], "[", "t", "]"}]}], "+", RowBox[{ RowBox[{"Sin", "[", RowBox[{"\[CapitalDelta]\[Beta]", "[", "t", "]"}], "]"}], " ", RowBox[{ SubscriptBox["V", "1"], "[", "t", "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"Sin", "[", RowBox[{ SubscriptBox["\[Alpha]", "1"], "[", "t", "]"}], "]"}], " ", RowBox[{ SubscriptBox["\[Omega]", "x1"], "[", "t", "]"}]}], "+", RowBox[{ RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[Alpha]", "1"], "[", "t", "]"}], "]"}], " ", RowBox[{ SubscriptBox["\[Omega]", "y1"], "[", "t", "]"}]}], "-", RowBox[{ SuperscriptBox["\[CapitalDelta]\[Beta]", "\[Prime]", MultilineFunction->None], "[", "t", "]"}]}], ")"}]}]}], ")"}]}], "\[Equal]", RowBox[{ RowBox[{"G", " ", RowBox[{"Cos", "[", RowBox[{"\[CapitalDelta]\[Gamma]", "[", "t", "]"}], "]"}], " ", RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[CurlyTheta]", "1"], "[", "t", "]"}], "]"}], " ", RowBox[{"Sin", "[", RowBox[{ SubscriptBox["\[Alpha]", "1"], "[", "t", "]"}], "]"}]}], "-", RowBox[{"G", " ", RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[Alpha]", "1"], "[", "t", "]"}], "]"}], " ", RowBox[{"Sin", "[", RowBox[{ SubscriptBox["\[CurlyTheta]", "1"], "[", "t", "]"}], "]"}]}], "+", RowBox[{ RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[Phi]", "p"], "+", RowBox[{ SubscriptBox["\[Alpha]", "1"], "[", "t", "]"}]}], "]"}], " ", SubscriptBox["P", "1"]}], "-", RowBox[{ RowBox[{"Cos", "[", RowBox[{"\[CapitalDelta]\[Beta]", "[", "t", "]"}], "]"}], " ", SubscriptBox["X", "1"]}], "-", RowBox[{ RowBox[{"Sin", "[", RowBox[{"\[CapitalDelta]\[Beta]", "[", "t", "]"}], "]"}], " ", SubscriptBox["Z", "1"]}]}]}]], "Output", CellChangeTimes->{{3.5020462545646777`*^9, 3.502046275803892*^9}, 3.5020465159696293`*^9, 3.5020465705647516`*^9, 3.5020504223140593`*^9, 3.502050454915924*^9, 3.50205184863764*^9, 3.5020520660410748`*^9, 3.502355694700755*^9}] }, Open ]], Cell["\<\ \:041f\:0440\:0435\:043d\:0435\:0431\:0440\:0435\:0436\:0435\:043c \:0432\ \:0442\:043e\:0440\:044b\:043c \:043f\:043e\:0440\:044f\:0434\:043a\:043e\ \:043c \:043c\:0430\:043b\:043e\:0441\:0442\:0438:\ \>", "Text", CellChangeTimes->{3.5020463136230555`*^9}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"IVD", "=", RowBox[{"IVD", "/.", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"Cos", "[", RowBox[{"\[CapitalDelta]\[Beta]", "[", "t", "]"}], "]"}], "\[Rule]", "1"}], ",", RowBox[{ RowBox[{"Sin", "[", RowBox[{"\[CapitalDelta]\[Beta]", "[", "t", "]"}], "]"}], "\[Rule]", "0"}], ",", RowBox[{ RowBox[{"Cos", "[", RowBox[{"\[CapitalDelta]\[Gamma]", "[", "t", "]"}], "]"}], "\[Rule]", "1"}]}], "}"}]}]}]], "Input", CellChangeTimes->{{3.5020463202334337`*^9, 3.502046357551568*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"m", " ", RowBox[{ SuperscriptBox["\[CapitalDelta]V", "\[Prime]", MultilineFunction->None], "[", "t", "]"}]}], "\[Equal]", RowBox[{ RowBox[{"G", " ", RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[CurlyTheta]", "1"], "[", "t", "]"}], "]"}], " ", RowBox[{"Sin", "[", RowBox[{ SubscriptBox["\[Alpha]", "1"], "[", "t", "]"}], "]"}]}], "-", RowBox[{"G", " ", RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[Alpha]", "1"], "[", "t", "]"}], "]"}], " ", RowBox[{"Sin", "[", RowBox[{ SubscriptBox["\[CurlyTheta]", "1"], "[", "t", "]"}], "]"}]}], "+", RowBox[{ RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[Phi]", "p"], "+", RowBox[{ SubscriptBox["\[Alpha]", "1"], "[", "t", "]"}]}], "]"}], " ", SubscriptBox["P", "1"]}], "-", SubscriptBox["X", "1"]}]}]], "Output", CellChangeTimes->{3.5020463587486362`*^9, 3.5020465759210577`*^9, 3.5020504247531986`*^9, 3.502050457623079*^9, 3.5020518486866426`*^9, 3.5020520660860777`*^9, 3.502355694735757*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"IVD", "=", RowBox[{ RowBox[{"IVD", "/.", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"G", " ", RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[CurlyTheta]", "1"], "[", "t", "]"}], "]"}], " ", RowBox[{"Sin", "[", RowBox[{ SubscriptBox["\[Alpha]", "1"], "[", "t", "]"}], "]"}]}], "-", RowBox[{"G", " ", RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[Alpha]", "1"], "[", "t", "]"}], "]"}], " ", RowBox[{"Sin", "[", RowBox[{ SubscriptBox["\[CurlyTheta]", "1"], "[", "t", "]"}], "]"}]}]}], "->", RowBox[{"G", " ", RowBox[{"Sin", "[", RowBox[{ RowBox[{ SubscriptBox["\[Alpha]", "1"], "[", "t", "]"}], "-", RowBox[{ SubscriptBox["\[CurlyTheta]", "1"], "[", "t", "]"}]}], "]"}]}]}], "}"}]}], "/.", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[Alpha]", "1"], "[", "t", "]"}], "-", RowBox[{ SubscriptBox["\[CurlyTheta]", "1"], "[", "t", "]"}]}], "\[Rule]", RowBox[{ SubscriptBox["\[Theta]", "1"], "[", "t", "]"}]}], "}"}]}]}]], "Input", CellChangeTimes->{{3.5020465893548265`*^9, 3.5020466507403374`*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"m", " ", RowBox[{ SuperscriptBox["\[CapitalDelta]V", "\[Prime]", MultilineFunction->None], "[", "t", "]"}]}], "\[Equal]", RowBox[{ RowBox[{"G", " ", RowBox[{"Sin", "[", RowBox[{ SubscriptBox["\[Theta]", "1"], "[", "t", "]"}], "]"}]}], "+", RowBox[{ RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[Phi]", "p"], "+", RowBox[{ SubscriptBox["\[Alpha]", "1"], "[", "t", "]"}]}], "]"}], " ", SubscriptBox["P", "1"]}], "-", SubscriptBox["X", "1"]}]}]], "Output", CellChangeTimes->{3.502046651632388*^9, 3.50205042583226*^9, 3.502050460490243*^9, 3.502051848740646*^9, 3.50205206613008*^9, 3.5023556947727585`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"IVD", "=", RowBox[{"IVD", "/.", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[Alpha]", "1"], "[", "t", "]"}], "\[Rule]", RowBox[{ RowBox[{ SubscriptBox["\[Alpha]", "0"], "[", "t", "]"}], "+", RowBox[{"\[CapitalDelta]\[Alpha]", "[", "t", "]"}]}]}], ",", RowBox[{ RowBox[{ SubscriptBox["\[Theta]", "1"], "[", "t", "]"}], "\[Rule]", RowBox[{ RowBox[{ SubscriptBox["\[Theta]", "0"], "[", "t", "]"}], "+", RowBox[{"\[CapitalDelta]\[Theta]", "[", "t", "]"}]}]}], ",", RowBox[{ SubscriptBox["P", "1"], "\[Rule]", RowBox[{ SubscriptBox["P", "0"], "+", "\[CapitalDelta]P"}]}], ",", RowBox[{ SubscriptBox["X", "1"], "\[Rule]", RowBox[{ SubscriptBox["X", "0"], "+", "\[CapitalDelta]X"}]}]}], "}"}]}]}]], "Input", CellChangeTimes->{{3.5020475020160275`*^9, 3.502047536132979*^9}, { 3.5020478049463544`*^9, 3.5020478232344007`*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"m", " ", RowBox[{ SuperscriptBox["\[CapitalDelta]V", "\[Prime]", MultilineFunction->None], "[", "t", "]"}]}], "\[Equal]", RowBox[{ RowBox[{"-", "\[CapitalDelta]X"}], "+", RowBox[{"G", " ", RowBox[{"Sin", "[", RowBox[{ RowBox[{"\[CapitalDelta]\[Theta]", "[", "t", "]"}], "+", RowBox[{ SubscriptBox["\[Theta]", "0"], "[", "t", "]"}]}], "]"}]}], "+", RowBox[{ RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[Phi]", "p"], "+", RowBox[{"\[CapitalDelta]\[Alpha]", "[", "t", "]"}], "+", RowBox[{ SubscriptBox["\[Alpha]", "0"], "[", "t", "]"}]}], "]"}], " ", RowBox[{"(", RowBox[{"\[CapitalDelta]P", "+", SubscriptBox["P", "0"]}], ")"}]}], "-", SubscriptBox["X", "0"]}]}]], "Output", CellChangeTimes->{ 3.502047536452997*^9, {3.502047811359721*^9, 3.5020478246634817`*^9}, { 3.5020504155536723`*^9, 3.502050427349347*^9}, 3.5020504620633326`*^9, 3.5020518487866488`*^9, 3.5020520661710825`*^9, 3.5023556948087606`*^9}] }, Open ]], Cell["\<\ \:0420\:0430\:0437\:043b\:043e\:0436\:0438\:043c \:0444\:0443\:043d\:043a\ \:0446\:0438\:0438 \:0432 \:0440\:044f\:0434 \:0422\:0435\:0439\:043b\:043e\ \:0440\:0430, \:043e\:0441\:0442\:0430\:0432\:0438\:0432 \:0447\:043b\:0435\ \:043d\:044b \:043f\:043e\:0440\:044f\:0434\:043a\:0430 \:043c\:0430\:043b\ \:043e\:0441\:0442\:0438 \:043d\:0435 \:0432\:044b\:0448\:0435 \:043f\:0435\ \:0440\:0432\:043e\:0439:\ \>", "Text", CellChangeTimes->{{3.5020475451604953`*^9, 3.5020475715200033`*^9}, { 3.502047646517293*^9, 3.5020476609701195`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Column", "[", RowBox[{"serT", "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"Sin", "[", RowBox[{ RowBox[{"\[CapitalDelta]\[Theta]", "[", "t", "]"}], "+", RowBox[{ SubscriptBox["\[Theta]", "0"], "[", "t", "]"}]}], "]"}], "->", RowBox[{"Normal", "[", RowBox[{"Series", "[", RowBox[{ RowBox[{"Sin", "[", RowBox[{ RowBox[{"\[CapitalDelta]\[Theta]", "[", "t", "]"}], "+", RowBox[{ SubscriptBox["\[Theta]", "0"], "[", "t", "]"}]}], "]"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[CapitalDelta]\[Theta]", "[", "t", "]"}], ",", "0", ",", "1"}], "}"}]}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[Phi]", "p"], "+", RowBox[{"\[CapitalDelta]\[Alpha]", "[", "t", "]"}], "+", RowBox[{ SubscriptBox["\[Alpha]", "0"], "[", "t", "]"}]}], "]"}], "->", RowBox[{"Normal", "[", RowBox[{"Series", "[", RowBox[{ RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[Phi]", "p"], "+", RowBox[{"\[CapitalDelta]\[Alpha]", "[", "t", "]"}], "+", RowBox[{ SubscriptBox["\[Alpha]", "0"], "[", "t", "]"}]}], "]"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[CapitalDelta]\[Alpha]", "[", "t", "]"}], ",", "0", ",", "1"}], "}"}]}], "]"}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"\[CapitalDelta]X", "\[Rule]", RowBox[{ RowBox[{ RowBox[{"D", "[", RowBox[{ RowBox[{"X", "[", "V", "]"}], ",", "V"}], "]"}], " ", "\[CapitalDelta]V"}], "+", RowBox[{ RowBox[{"D", "[", RowBox[{ RowBox[{"X", "[", "\[Alpha]", "]"}], ",", "\[Alpha]"}], "]"}], " ", "\[CapitalDelta]\[Alpha]"}]}]}], ",", "\[IndentingNewLine]", RowBox[{"\[CapitalDelta]P", "\[Rule]", RowBox[{ RowBox[{ RowBox[{"D", "[", RowBox[{ RowBox[{"P", "[", "V", "]"}], ",", "V"}], "]"}], " ", "\[CapitalDelta]V"}], "+", RowBox[{ RowBox[{"D", "[", RowBox[{ RowBox[{"P", "[", SubscriptBox["\[Delta]", "\:0441\:0433"], "]"}], ",", SubscriptBox["\[Delta]", "\:0441\:0433"]}], "]"}], " ", SubscriptBox["\[CapitalDelta]\[Delta]", "\:0441\:0433"]}]}]}]}], "}"}]}], "]"}]], "Input", CellChangeTimes->{{3.5020475893600235`*^9, 3.5020476299773464`*^9}, { 3.502047678179104*^9, 3.5020477241607337`*^9}, {3.5020491864283705`*^9, 3.502049205002433*^9}, {3.5020492537442207`*^9, 3.50204925915053*^9}, { 3.5020492918494005`*^9, 3.5020494351905985`*^9}, {3.50204954833007*^9, 3.502049581438964*^9}, {3.5020496260995183`*^9, 3.5020497749050293`*^9}, { 3.5020500803154984`*^9, 3.5020501643133025`*^9}, {3.5020502423317647`*^9, 3.502050244534891*^9}, {3.5020504047650557`*^9, 3.5020504106223907`*^9}, 3.5020504449413533`*^9, {3.5020518385480633`*^9, 3.502051845351452*^9}, { 3.5020520250887327`*^9, 3.5020520556514807`*^9}}], Cell[BoxData[ TagBox[GridBox[{ { RowBox[{ RowBox[{"Sin", "[", RowBox[{ RowBox[{"\[CapitalDelta]\[Theta]", "[", "t", "]"}], "+", RowBox[{ SubscriptBox["\[Theta]", "0"], "[", "t", "]"}]}], "]"}], "\[Rule]", RowBox[{ RowBox[{"Sin", "[", RowBox[{ SubscriptBox["\[Theta]", "0"], "[", "t", "]"}], "]"}], "+", RowBox[{ RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[Theta]", "0"], "[", "t", "]"}], "]"}], " ", RowBox[{"\[CapitalDelta]\[Theta]", "[", "t", "]"}]}]}]}]}, { RowBox[{ RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[Phi]", "p"], "+", RowBox[{"\[CapitalDelta]\[Alpha]", "[", "t", "]"}], "+", RowBox[{ SubscriptBox["\[Alpha]", "0"], "[", "t", "]"}]}], "]"}], "\[Rule]", RowBox[{ RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[Phi]", "p"], "+", RowBox[{ SubscriptBox["\[Alpha]", "0"], "[", "t", "]"}]}], "]"}], "-", RowBox[{ RowBox[{"Sin", "[", RowBox[{ SubscriptBox["\[Phi]", "p"], "+", RowBox[{ SubscriptBox["\[Alpha]", "0"], "[", "t", "]"}]}], "]"}], " ", RowBox[{"\[CapitalDelta]\[Alpha]", "[", "t", "]"}]}]}]}]}, { RowBox[{"\[CapitalDelta]X", "\[Rule]", RowBox[{ RowBox[{"\[CapitalDelta]V", " ", RowBox[{ SuperscriptBox["X", "\[Prime]", MultilineFunction->None], "[", "V", "]"}]}], "+", RowBox[{"\[CapitalDelta]\[Alpha]", " ", RowBox[{ SuperscriptBox["X", "\[Prime]", MultilineFunction->None], "[", "\[Alpha]", "]"}]}]}]}]}, { RowBox[{"\[CapitalDelta]P", "\[Rule]", RowBox[{ RowBox[{"\[CapitalDelta]V", " ", RowBox[{ SuperscriptBox["P", "\[Prime]", MultilineFunction->None], "[", "V", "]"}]}], "+", RowBox[{ SubscriptBox["\[CapitalDelta]\[Delta]", "\:0441\:0433"], " ", RowBox[{ SuperscriptBox["P", "\[Prime]", MultilineFunction->None], "[", SubscriptBox["\[Delta]", "\:0441\:0433"], "]"}]}]}]}]} }, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]], "Output", CellChangeTimes->{{3.502050156386849*^9, 3.502050164662322*^9}, 3.5020502453459373`*^9, {3.5020504321196203`*^9, 3.5020504634734135`*^9}, 3.502051848836652*^9, {3.502052058098621*^9, 3.5020520662210855`*^9}, 3.502355694954769*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"IVD", "=", RowBox[{"IVD", "/.", "serT"}]}]], "Input", CellChangeTimes->{{3.502050308608556*^9, 3.5020503172580504`*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"m", " ", RowBox[{ SuperscriptBox["\[CapitalDelta]V", "\[Prime]", MultilineFunction->None], "[", "t", "]"}]}], "\[Equal]", RowBox[{ RowBox[{"-", SubscriptBox["X", "0"]}], "+", RowBox[{"G", " ", RowBox[{"(", RowBox[{ RowBox[{"Sin", "[", RowBox[{ SubscriptBox["\[Theta]", "0"], "[", "t", "]"}], "]"}], "+", RowBox[{ RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[Theta]", "0"], "[", "t", "]"}], "]"}], " ", RowBox[{"\[CapitalDelta]\[Theta]", "[", "t", "]"}]}]}], ")"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[Phi]", "p"], "+", RowBox[{ SubscriptBox["\[Alpha]", "0"], "[", "t", "]"}]}], "]"}], "-", RowBox[{ RowBox[{"Sin", "[", RowBox[{ SubscriptBox["\[Phi]", "p"], "+", RowBox[{ SubscriptBox["\[Alpha]", "0"], "[", "t", "]"}]}], "]"}], " ", RowBox[{"\[CapitalDelta]\[Alpha]", "[", "t", "]"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ SubscriptBox["P", "0"], "+", RowBox[{"\[CapitalDelta]V", " ", RowBox[{ SuperscriptBox["P", "\[Prime]", MultilineFunction->None], "[", "V", "]"}]}], "+", RowBox[{ SubscriptBox["\[CapitalDelta]\[Delta]", "\:0441\:0433"], " ", RowBox[{ SuperscriptBox["P", "\[Prime]", MultilineFunction->None], "[", SubscriptBox["\[Delta]", "\:0441\:0433"], "]"}]}]}], ")"}]}], "-", RowBox[{"\[CapitalDelta]V", " ", RowBox[{ SuperscriptBox["X", "\[Prime]", MultilineFunction->None], "[", "V", "]"}]}], "-", RowBox[{"\[CapitalDelta]\[Alpha]", " ", RowBox[{ SuperscriptBox["X", "\[Prime]", MultilineFunction->None], "[", "\[Alpha]", "]"}]}]}]}]], "Output", CellChangeTimes->{ 3.5020503182271056`*^9, {3.5020504370239005`*^9, 3.5020504664725847`*^9}, 3.5020518488806543`*^9, 3.502052066265088*^9, 3.5023556949907713`*^9}] }, Open ]], Cell["\:0412\:043e\:0437\:043c\:0443\:0449\:0435\:043d\:043d\:043e\:0435 \ \:0434\:0432\:0438\:0436\:0435\:043d\:0438\:0435:", "Text", CellChangeTimes->{{3.502044342384307*^9, 3.502044351137808*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VD", "=", RowBox[{ RowBox[{ RowBox[{"IVD", "[", RowBox[{"[", "1", "]"}], "]"}], "-", RowBox[{"IOD", "[", RowBox[{"[", "1", "]"}], "]"}]}], "\[Equal]", RowBox[{"FullSimplify", "[", RowBox[{ RowBox[{"Expand", "[", RowBox[{"FullSimplify", "[", RowBox[{ RowBox[{"IVD", "[", RowBox[{"[", "2", "]"}], "]"}], "-", RowBox[{"IOD", "[", RowBox[{"[", "2", "]"}], "]"}]}], "]"}], "]"}], "/.", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"\[CapitalDelta]P", " ", RowBox[{"\[CapitalDelta]\[Alpha]", "[", "t", "]"}]}], "\[Rule]", "0"}], ",", RowBox[{ RowBox[{ SubscriptBox["P", "0"], " ", RowBox[{"\[CapitalDelta]\[Alpha]", "[", "t", "]"}]}], "\[Rule]", "0"}], ",", RowBox[{ RowBox[{ RowBox[{"\[CapitalDelta]\[Alpha]", "[", "t", "]"}], " ", "\[CapitalDelta]V"}], "\[Rule]", "0"}], ",", " ", RowBox[{ RowBox[{ RowBox[{"\[CapitalDelta]\[Alpha]", "[", "t", "]"}], "\[CapitalDelta]V"}], "\[Rule]", "0"}], ",", RowBox[{ RowBox[{ RowBox[{"\[CapitalDelta]\[Alpha]", "[", "t", "]"}], " ", SubscriptBox["\[CapitalDelta]\[Delta]", "\:0441\:0433"]}], "\[Rule]", "0"}]}], "}"}]}], "]"}]}]}]], "Input", CellChangeTimes->{{3.502044337307017*^9, 3.5020444138843966`*^9}, { 3.502050343849571*^9, 3.502050348846857*^9}, {3.5020507229142523`*^9, 3.5020507264384537`*^9}, {3.5020517659099083`*^9, 3.5020518094173965`*^9}, { 3.5020518644665456`*^9, 3.5020518811955023`*^9}, {3.5020519236999335`*^9, 3.502051939743851*^9}, {3.502052000402321*^9, 3.502052010794915*^9}, { 3.5020520982889194`*^9, 3.502052210140317*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"m", " ", RowBox[{ SuperscriptBox["\[CapitalDelta]V", "\[Prime]", MultilineFunction->None], "[", "t", "]"}]}], "\[Equal]", RowBox[{ RowBox[{"G", " ", RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[Theta]", "0"], "[", "t", "]"}], "]"}], " ", RowBox[{"\[CapitalDelta]\[Theta]", "[", "t", "]"}]}], "+", RowBox[{ RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[Phi]", "p"], "+", RowBox[{ SubscriptBox["\[Alpha]", "0"], "[", "t", "]"}]}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[CapitalDelta]V", " ", RowBox[{ SuperscriptBox["P", "\[Prime]", MultilineFunction->None], "[", "V", "]"}]}], "+", RowBox[{ SubscriptBox["\[CapitalDelta]\[Delta]", "\:0441\:0433"], " ", RowBox[{ SuperscriptBox["P", "\[Prime]", MultilineFunction->None], "[", SubscriptBox["\[Delta]", "\:0441\:0433"], "]"}]}]}], ")"}]}], "-", RowBox[{"\[CapitalDelta]V", " ", RowBox[{ SuperscriptBox["X", "\[Prime]", MultilineFunction->None], "[", "V", "]"}]}], "-", RowBox[{"\[CapitalDelta]\[Alpha]", " ", RowBox[{ SuperscriptBox["X", "\[Prime]", MultilineFunction->None], "[", "\[Alpha]", "]"}]}]}]}]], "Output", CellChangeTimes->{3.5020522997624435`*^9, 3.5023556965348597`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VDK", "=", RowBox[{ RowBox[{ RowBox[{ RowBox[{"VD", "[", RowBox[{"[", "1", "]"}], "]"}], "/", "m"}], "+", RowBox[{ RowBox[{"VD", "[", RowBox[{"[", "2", "]"}], "]"}], "/", "m"}]}], "\[Equal]", "0"}]}]], "Input", CellChangeTimes->{{3.5020522944231377`*^9, 3.5020523143502774`*^9}, { 3.5020523835532355`*^9, 3.5020523984090853`*^9}}], Cell[BoxData[ RowBox[{ RowBox[{ FractionBox[ RowBox[{ RowBox[{"G", " ", RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[Theta]", "0"], "[", "t", "]"}], "]"}], " ", RowBox[{"\[CapitalDelta]\[Theta]", "[", "t", "]"}]}], "+", RowBox[{ RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[Phi]", "p"], "+", RowBox[{ SubscriptBox["\[Alpha]", "0"], "[", "t", "]"}]}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[CapitalDelta]V", " ", RowBox[{ SuperscriptBox["P", "\[Prime]", MultilineFunction->None], "[", "V", "]"}]}], "+", RowBox[{ SubscriptBox["\[CapitalDelta]\[Delta]", "\:0441\:0433"], " ", RowBox[{ SuperscriptBox["P", "\[Prime]", MultilineFunction->None], "[", SubscriptBox["\[Delta]", "\:0441\:0433"], "]"}]}]}], ")"}]}], "-", RowBox[{"\[CapitalDelta]V", " ", RowBox[{ SuperscriptBox["X", "\[Prime]", MultilineFunction->None], "[", "V", "]"}]}], "-", RowBox[{"\[CapitalDelta]\[Alpha]", " ", RowBox[{ SuperscriptBox["X", "\[Prime]", MultilineFunction->None], "[", "\[Alpha]", "]"}]}]}], "m"], "+", RowBox[{ SuperscriptBox["\[CapitalDelta]V", "\[Prime]", MultilineFunction->None], "[", "t", "]"}]}], "\[Equal]", "0"}]], "Output", CellChangeTimes->{3.5020523991811295`*^9, 3.5023556966048636`*^9}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["\:041b\:0438\:043d\:0435\:0430\:0440\:0438\:0437\:043e\:0432\:0430\:043d\ \:043d\:043e\:0435 \:0443\:0440\:0430\:0432\:043d\:0435\:043d\:0438\:0435", \ "Subsection", CellChangeTimes->{{3.5020522572120094`*^9, 3.50205227051077*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"LK", "=", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["c", "8"], " ", "\[CapitalDelta]\[Alpha]"}], "+", RowBox[{ SubscriptBox["e", "1"], " ", "\[CapitalDelta]V"}], "+", RowBox[{ SubscriptBox["c", "7"], " ", "\[CapitalDelta]\[CurlyTheta]"}], "+", RowBox[{ SubscriptBox["r", "2"], " ", SubscriptBox["\[Delta]", "\:0441\:0433"]}]}], "\[Equal]", "0"}]}], ";"}]], "Input", CellChangeTimes->{{3.502052427048723*^9, 3.5020524914434066`*^9}, { 3.502052527295457*^9, 3.502052534831888*^9}, {3.5020525871118784`*^9, 3.5020526017507157`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ SubscriptBox["c", "8"], "\[Equal]", RowBox[{"-", RowBox[{"D", "[", RowBox[{ RowBox[{"VDK", "[", RowBox[{"[", "1", "]"}], "]"}], ",", "\[CapitalDelta]\[Alpha]"}], "]"}]}], "\[Equal]", RowBox[{ FractionBox[ RowBox[{"(", RowBox[{ SubsuperscriptBox["C", "x", "\[Alpha]"], "-", SubscriptBox["C", "y"]}], ")"}], RowBox[{"57.3", " ", "m"}]], FractionBox[ RowBox[{"\[Rho]", " ", RowBox[{"V", "^", "2"}]}], RowBox[{"2", " ", "S"}]]}]}]], "Input", CellChangeTimes->{{3.502052607313034*^9, 3.502052774763612*^9}, 3.5020534114710293`*^9}], Cell[BoxData[ RowBox[{ SubscriptBox["c", "8"], "\[Equal]", FractionBox[ RowBox[{ SuperscriptBox["X", "\[Prime]", MultilineFunction->None], "[", "\[Alpha]", "]"}], "m"], "\[Equal]", FractionBox[ RowBox[{"0.008726003490401396`", " ", SuperscriptBox["V", "2"], " ", "\[Rho]", " ", RowBox[{"(", RowBox[{ SubsuperscriptBox["C", "x", "\[Alpha]"], "-", SubscriptBox["C", "y"]}], ")"}]}], RowBox[{"m", " ", "S"}]]}]], "Output", CellChangeTimes->{{3.5020526462642617`*^9, 3.502052665344353*^9}, 3.502052736345414*^9, 3.502052775723666*^9, 3.502053412408083*^9, 3.502355696648866*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ SubscriptBox["e", "1"], "\[Equal]", RowBox[{"-", RowBox[{ RowBox[{"D", "[", RowBox[{ RowBox[{"VDK", "[", RowBox[{"[", "1", "]"}], "]"}], ",", "\[CapitalDelta]V"}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}]}], "\[Equal]", RowBox[{ FractionBox[ RowBox[{"\[Rho]", " ", "S", " ", "V"}], "m"], " ", SubscriptBox["C", "x"], " ", RowBox[{"(", RowBox[{"1", "+", FractionBox[ RowBox[{ SubsuperscriptBox["C", "x", "M"], " ", "M"}], SubscriptBox["C", "x"]], "-", FractionBox[ SuperscriptBox["P", "V"], RowBox[{"\[Rho]", " ", "S", " ", "V", " ", SubscriptBox["C", "x"]}]]}], ")"}]}]}]], "Input", CellChangeTimes->{{3.5020528197831864`*^9, 3.502052837395194*^9}, { 3.502053251198862*^9, 3.5020533861195793`*^9}, 3.5020534178083916`*^9}], Cell[BoxData[ RowBox[{ SubscriptBox["e", "1"], "\[Equal]", RowBox[{"-", FractionBox[ RowBox[{ RowBox[{ RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[Phi]", "p"], "+", RowBox[{ SubscriptBox["\[Alpha]", "0"], "[", "t", "]"}]}], "]"}], " ", RowBox[{ SuperscriptBox["P", "\[Prime]", MultilineFunction->None], "[", "V", "]"}]}], "-", RowBox[{ SuperscriptBox["X", "\[Prime]", MultilineFunction->None], "[", "V", "]"}]}], "m"]}], "\[Equal]", FractionBox[ RowBox[{"S", " ", "V", " ", "\[Rho]", " ", SubscriptBox["C", "x"], " ", RowBox[{"(", RowBox[{"1", "-", FractionBox[ SuperscriptBox["P", "V"], RowBox[{"S", " ", "V", " ", "\[Rho]", " ", SubscriptBox["C", "x"]}]], "+", RowBox[{"M", " ", SubsuperscriptBox["C", "x", RowBox[{ RowBox[{"-", "1"}], "+", "M"}]]}]}], ")"}]}], "m"]}]], "Output", CellChangeTimes->{3.502052837734213*^9, 3.5020532526929474`*^9, 3.5020533873306484`*^9, 3.5020534194514856`*^9, 3.5023556966848683`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ SubscriptBox["c", "7"], "==", RowBox[{"D", "[", RowBox[{ RowBox[{"VDK", "[", RowBox[{"[", "1", "]"}], "]"}], ",", RowBox[{"\[CapitalDelta]\[Theta]", "[", "t", "]"}]}], "]"}], "\[Equal]", RowBox[{ FractionBox["g", "57.3"], RowBox[{"Cos", "[", SubscriptBox["\[Theta]", "0"], "]"}]}]}]], "Input", CellChangeTimes->{{3.502053131981043*^9, 3.502053151658169*^9}, { 3.50205342564684*^9, 3.502053447100067*^9}, {3.5020534973009386`*^9, 3.5020535753504024`*^9}}], Cell[BoxData[ RowBox[{ SubscriptBox["c", "7"], "\[Equal]", FractionBox[ RowBox[{"G", " ", RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[Theta]", "0"], "[", "t", "]"}], "]"}]}], "m"], "\[Equal]", RowBox[{"0.017452006980802792`", " ", "g", " ", RowBox[{"Cos", "[", SubscriptBox["\[Theta]", "0"], "]"}]}]}]], "Output", CellChangeTimes->{{3.5020531404805293`*^9, 3.5020531524522142`*^9}, { 3.502053499643072*^9, 3.5020535766244755`*^9}, 3.50235569671787*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ SubscriptBox["r", "2"], "==", RowBox[{"D", "[", RowBox[{ RowBox[{"VDK", "[", RowBox[{"[", "1", "]"}], "]"}], ",", SubscriptBox["\[CapitalDelta]\[Delta]", "\:0441\:0433"]}], "]"}]}]], "Input", CellChangeTimes->{{3.502053586547043*^9, 3.502053618178852*^9}}], Cell[BoxData[ RowBox[{ SubscriptBox["r", "2"], "\[Equal]", FractionBox[ RowBox[{ RowBox[{"Cos", "[", RowBox[{ SubscriptBox["\[Phi]", "p"], "+", RowBox[{ SubscriptBox["\[Alpha]", "0"], "[", "t", "]"}]}], "]"}], " ", RowBox[{ SuperscriptBox["P", "\[Prime]", MultilineFunction->None], "[", SubscriptBox["\[Delta]", "\:0441\:0433"], "]"}]}], "m"]}]], "Output", CellChangeTimes->{{3.502053601043872*^9, 3.5020536191409073`*^9}, 3.502355696749872*^9}] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell["\<\ \:0410\:043d\:0430\:043b\:0438\:0437 \:0443\:0441\:0442\:043e\:0439\:0447\ \:0438\:0432\:043e\:0441\:0442\:0438 \:043f\:0440\:043e\:0434\:043e\:043b\ \:044c\:043d\:043e\:0433\:043e \:0434\:0432\:0438\:0436\:0435\:043d\:0438\ \:044f\ \>", "Subsection", CellChangeTimes->{{3.5020536829435563`*^9, 3.5020536900079603`*^9}, { 3.5020807394941025`*^9, 3.502080781532507*^9}}], Cell[TextData[{ "\:041a\:0440\:0438\:0442\:0435\:0440\:0438\:0435\:043c \:0434\:043e\:043f\ \:0443\:0441\:0442\:0438\:043c\:043e\:0441\:0442\:0438 \:0440\:0430\:0437\ \:0434\:0435\:043b\:0435\:043d\:0438\:044f \:043f\:0440\:043e\:0434\:043e\ \:043b\:044c\:043d\:043e\:0433\:043e \:0434\:0432\:0438\:0436\:0435\:043d\ \:0438\:044f \:043d\:0430 \:043a\:043e\:0440\:043e\:0442\:043a\:043e\:043f\ \:0435\:0440\:0438\:043e\:0434\:0438\:0447\:0435\:0441\:043a\:043e\:0435 \ \:0438 \:0434\:043b\:0438\:043d\:043d\:043e\:043f\:0435\:0440\:0438\:043e\ \:0434\:0438\:0447\:0435\:0441\:043a\:043e\:0435 \:0434\:0432\:0438\:0436\ \:0435\:043d\:0438\:044f \:0441\:0430\:043c\:043e\:043b\:0435\:0442\:0430 \ \:044f\:0432\:043b\:044f\:0435\:0442\:0441\:044f \:0443\:0441\:043b\:043e\ \:0432\:0438\:0435 \:0443\:0441\:0442\:043e\:0439\:0447\:0438\:0432\:043e\ \:0441\:0442\:0438 \:043a\:043e\:0440\:043e\:0442\:043a\:043e\:043f\:0435\ \:0440\:0438\:043e\:0434\:0438\:0447\:0435\:0441\:043a\:043e\:0433\:043e \ \:0434\:0432\:0438\:0436\:0435\:043d\:0438\:044f \:043f\:0440\:0438 ", Cell[BoxData[ FormBox[ SubscriptBox["\:0441", "2"], TraditionalForm]], FormatType->"TraditionalForm"], " > 0." }], "Text", CellChangeTimes->{{3.502080822218834*^9, 3.5020808406178865`*^9}}], Cell[TextData[{ "\:0423 \:043f\:0435\:0440\:0432\:043e\:0433\:043e \:0440\:0435\:0436\:0438\ \:043c\:0430 ", Cell[BoxData[ FormBox[ RowBox[{ SubscriptBox["c", "2"], "=", RowBox[{ RowBox[{"-", "1.0"}], " ", "\[DoubleRightArrow]", " ", RowBox[{"\:041a\:041f\:0414", " ", RowBox[{ "\:043d\:0435\:0443\:0441\:0442\:043e\:0439\:0447\:0438\:0432\:043e", "."}]}]}]}], TraditionalForm]]], "\n\:0423 \:0432\:0442\:043e\:0440\:043e\:0433\:043e \ \:0440\:0435\:0436\:0438\:043c\:0430 ", Cell[BoxData[ FormBox[ RowBox[{ SubscriptBox["c", "2"], "=", RowBox[{"29.5", " ", "\[DoubleRightArrow]", " ", RowBox[{"\:041a\:041f\:0414", " ", RowBox[{ "\:0443\:0441\:0442\:043e\:0439\:0447\:0438\:0432\:043e", "."}]}]}]}], TraditionalForm]]] }], "Text", CellChangeTimes->{ 3.502081490692069*^9, {3.5020815363896823`*^9, 3.50208161571722*^9}, { 3.5020817035292425`*^9, 3.502081720747227*^9}}], Cell[CellGroupData[{ Cell["\:0420\:0430\:0441\:0441\:043c\:043e\:0442\:0440\:0438\:043c \:043f\ \:0435\:0440\:0432\:044b\:0439 \:0440\:0435\:0436\:0438\:043c", \ "Subsubsection", CellChangeTimes->{{3.502081726358548*^9, 3.5020817342229977`*^9}, 3.5020876267930336`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"c1", "=", "0.817"}], ";", RowBox[{"c2", "=", RowBox[{"-", "1.0"}]}], ";", RowBox[{"c3", "=", "8.80"}], ";", RowBox[{"c4", "=", "1.16"}], ";", RowBox[{"c5", "=", "0.303"}], ";", RowBox[{"c6", "=", "7.23"}], ";"}]], "Input", CellChangeTimes->{{3.5020817385912476`*^9, 3.5020817890921364`*^9}}], Cell["\<\ \:0410\:0432\:0442\:043e\:043c\:0430\:0442\:044b \:043f\:0440\:043e\:0434\ \:043e\:043b\:044c\:043d\:043e\:0439 \:0443\:043f\:0440\:0430\:0432\:043b\ \:044f\:0435\:043c\:043e\:0441\:0442\:0438 \:0434\:0430\:044e\:0442 \:0432\ \:043e\:0437\:043c\:043e\:0436\:043d\:043e\:0441\:0442\:044c \:043e\:0431\ \:0435\:0441\:043f\:0435\:0447\:0438\:0442\:044c \:0443\:0434\:043e\:0432\ \:043b\:0435\:0442\:0432\:043e\:0440\:0438\:0442\:0435\:043b\:044c\:043d\:044b\ \:0435 \:0434\:043b\:044f \:0440\:0443\:0447\:043d\:043e\:0433\:043e \:0443\ \:043f\:0440\:0430\:0432\:043b\:0435\:043d\:0438\:044f \:0445\:0430\:0440\ \:0430\:043a\:0442\:0435\:0440\:0438\:0441\:0442\:0438\:043a\:0438 \:0443\ \:0441\:0442\:043e\:0439\:0447\:0438\:0432\:043e\:0441\:0442\:0438 \:0438 \ \:0443\:043f\:0440\:0430\:0432\:043b\:044f\:0435\:043c\:043e\:0441\:0442\:0438\ , \:043a\:0430\:043a \:0434\:0438\:043d\:0430\:043c\:0438\:0447\:0435\:0441\ \:043a\:0438\:0435, \:0442\:0430\:043a \:0438 \:0441\:0442\:0430\:0442\:0438\ \:0447\:0435\:0441\:043a\:0438\:0435, \:0434\:043b\:044f \:043b\:044e\:0431\ \:043e\:0433\:043e, \:0432 \:0442\:043e\:043c \:0447\:0438\:0441\:043b\:0435 \ \:0438 \:043d\:0435\:0443\:0441\:0442\:043e\:0439\:0447\:0438\:0432\:043e\ \:0433\:043e \:0432 \:043a\:043e\:0440\:043e\:0442\:043a\:043e\:043f\:0435\ \:0440\:0438\:043e\:0434\:0438\:0447\:0435\:0441\:043a\:043e\:043c \:0434\ \:0432\:0438\:0436\:0435\:043d\:0438\:0438 \:0441\:0430\:043c\:043e\:043b\ \:0435\:0442\:0430.\ \>", "Text", CellChangeTimes->{3.5020824206112576`*^9}], Cell["\<\ \:0420\:0430\:0441\:0441\:0447\:0438\:0442\:0430\:0435\:043c \:043f\:0435\ \:0440\:0435\:0434\:0430\:0442\:043e\:0447\:043d\:044b\:0435 \:0447\:0438\ \:0441\:043b\:0430 \:0410\:041f\:0423.\ \>", "Text", CellChangeTimes->{{3.5020828046372223`*^9, 3.5020828334478703`*^9}}], Cell["\:0417\:0430\:0434\:0430\:043d\:043d\:043e\:0435 \:0432\:0440\:0435\ \:043c\:044f \:0440\:0435\:0433\:0443\:043b\:0438\:0440\:043e\:0432\:0430\ \:043d\:0438\:044f:", "Text", CellChangeTimes->{{3.50208303538242*^9, 3.502083044021914*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"Treg", "=", "2.5"}], ";"}]], "Input", CellChangeTimes->{{3.5020828444424987`*^9, 3.502082935917731*^9}, 3.5020830258808765`*^9}], Cell["\<\ \:041f\:0430\:0440\:0430\:043c\:0435\:0442\:0440, \:043e\:043f\:0440\:0435\ \:0434\:0435\:043b\:044f\:044e\:0449\:0438\:0439 \:043d\:0443\:043b\:044c \ \:043f\:0435\:0440\:0435\:0434\:0430\:0442\:043e\:0447\:043d\:043e\:0439 \ \:0444\:0443\:043d\:043a\:0446\:0438\:0438 (\:043f\:0440\:0438 T0 = 1.5 \ \:043f\:0435\:0440\:0435\:0445\:043e\:0434\:043d\:044b\:0439 \:043f\:0440\ \:043e\:0446\:0435\:0441\:0441 \:0432\:044b\:0445\:043e\:0434\:043e\:0434\ \:0430 \:043d\:0430 \:0437\:0430\:0434\:0430\:043d\:043d\:0443\:044e \:043f\ \:0435\:0440\:0435\:0433\:0440\:0443\:0437\:043a\:0443 \:0431\:043b\:0438\ \:0437\:043e\:043a \:043a \:0433\:0440\:0430\:043d\:0438\:0447\:043d\:043e\ \:043c\:0443 \:043c\:043e\:043d\:043e\:0442\:043e\:043d\:043d\:043e\:043c\ \:0443):\ \>", "Text", CellChangeTimes->{{3.50208305759669*^9, 3.502083080381994*^9}}], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"T0", "=", "1.5"}], ";"}], " "}]], "Input", CellChangeTimes->{{3.5020829157165756`*^9, 3.502083018678465*^9}}], Cell["\<\ \:0412\:0440\:0435\:043c\:044f \:0440\:0435\:0433\:0443\:043b\:0438\:0440\ \:043e\:0432\:0430\:043d\:0438\:044f \:0445\:0430\:0440\:0430\:043a\:0442\ \:0435\:0440\:043d\:043e\:0435 \:0434\:043b\:044f T0 = 1.5:\ \>", "Text", CellChangeTimes->{{3.502082910447274*^9, 3.502082913140428*^9}, { 3.5020830959838862`*^9, 3.502083114635953*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"Treg0", "=", "3.8"}], ";"}]], "Input", CellChangeTimes->{{3.5020831170220895`*^9, 3.502083124992545*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"\[CapitalOmega]0", "=", FractionBox["Treg0", "Treg"]}]], "Input", CellChangeTimes->{{3.5020860244303837`*^9, 3.502086063019591*^9}}], Cell[BoxData["1.52`"], "Output", CellChangeTimes->{3.502086063367611*^9, 3.502355696802875*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"\[Mu]", "=", FractionBox[ RowBox[{ RowBox[{"3", " ", "\[CapitalOmega]0"}], "-", "c1", "-", "c4", "-", "c5"}], "c3"]}]], "Input", CellChangeTimes->{{3.5020860854228725`*^9, 3.502086116167631*^9}}], Cell[BoxData["0.2590909090909091`"], "Output", CellChangeTimes->{3.5020861188967867`*^9, 3.5023556968358765`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"CyCgp", "=", FractionBox[ RowBox[{"c4", " ", "c6"}], "9.81"]}]], "Input", CellChangeTimes->{{3.5020862075648584`*^9, 3.5020862496642666`*^9}}], Cell[BoxData["0.8549235474006115`"], "Output", CellChangeTimes->{3.5020862521544085`*^9, 3.5023556968708787`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"K2", "=", FractionBox[ RowBox[{ RowBox[{"3", " ", SuperscriptBox["\[CapitalOmega]0", "2"]}], "-", "c2", "-", RowBox[{"c1", " ", "c4"}], "-", RowBox[{"c3", " ", "c4", " ", "\[Mu]"}]}], RowBox[{"c3", " ", "CyCgp"}]]}]], "Input", CellChangeTimes->{{3.502086123634058*^9, 3.50208619483113*^9}, { 3.502086256480656*^9, 3.502086274047661*^9}}], Cell[BoxData["0.5766969686130153`"], "Output", CellChangeTimes->{{3.5020862647531295`*^9, 3.5020862753717365`*^9}, 3.5023556969028807`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"MatrixForm", "[", RowBox[{"\[Omega]z", "=", RowBox[{"{", RowBox[{ RowBox[{"s", "+", "c1", "+", RowBox[{"c3", " ", "\[Mu]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{"-", "1"}]}], "}"}]}], "]"}]], "Input", CellChangeTimes->{{3.502086292714729*^9, 3.5020863559183435`*^9}, { 3.5020863960746403`*^9, 3.5020864160587835`*^9}}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", TagBox[GridBox[{ { RowBox[{"3.0970000000000004`", "\[InvisibleSpace]", "+", "s"}]}, { RowBox[{"-", "1"}]}, { RowBox[{"-", "1"}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.5599999999999999]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], Column], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{{3.5020864083853445`*^9, 3.502086416956835*^9}, 3.5023556969358826`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"MatrixForm", "[", RowBox[{"\[Alpha]", "=", RowBox[{"Simplify", "[", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"CyCgp", RowBox[{"(", RowBox[{ RowBox[{"c5", " ", "s"}], "+", "c2"}], ")"}]}], "+", RowBox[{"CyCgp", " ", "K2"}]}], ",", RowBox[{"CyCgp", RowBox[{"(", RowBox[{"s", "+", "c4"}], ")"}]}], ",", "0"}], "}"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.502086816999716*^9, 3.5020868435512347`*^9}, { 3.5020870184622393`*^9, 3.5020871299286146`*^9}}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", TagBox[GridBox[{ { RowBox[{ RowBox[{"-", "0.3618917292187933`"}], "+", RowBox[{"0.2590418348623853`", " ", "s"}]}]}, { RowBox[{"0.9917113149847092`", "\[InvisibleSpace]", "+", RowBox[{"0.8549235474006115`", " ", "s"}]}]}, {"0"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.5599999999999999]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], Column], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{3.502087095202628*^9, 3.5020871305366497`*^9, 3.5023556969708843`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"MatrixForm", "[", RowBox[{"\[Theta]", "=", RowBox[{"{", RowBox[{"0", ",", "0", ",", "s"}], "}"}]}], "]"}]], "Input", CellChangeTimes->{{3.5020871437744064`*^9, 3.50208716481461*^9}, { 3.5020872668724475`*^9, 3.5020872685785446`*^9}}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", TagBox[GridBox[{ {"0"}, {"0"}, {"s"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.5599999999999999]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], Column], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{3.5020871654136443`*^9, 3.5023556970048866`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"MatrixForm", "[", RowBox[{"\[Delta]v", "=", RowBox[{"{", RowBox[{"c3", ",", "0", ",", "0"}], "}"}]}], "]"}]], "Input", CellChangeTimes->{{3.5020871754712195`*^9, 3.502087221239837*^9}}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", TagBox[GridBox[{ {"8.8`"}, {"0"}, {"0"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.5599999999999999]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], Column], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{{3.502087194501308*^9, 3.502087221840872*^9}, 3.5023556970428886`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"MatrixForm", "[", RowBox[{"m1", "=", RowBox[{"Transpose", "[", RowBox[{"{", RowBox[{"\[Omega]z", ",", "\[Alpha]", ",", "\[Theta]"}], "}"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.5020872461072598`*^9, 3.5020872800412006`*^9}, { 3.5020873135241156`*^9, 3.502087319207441*^9}}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ { RowBox[{"3.0970000000000004`", "\[InvisibleSpace]", "+", "s"}], RowBox[{ RowBox[{"-", "0.3618917292187933`"}], "+", RowBox[{"0.2590418348623853`", " ", "s"}]}], "0"}, { RowBox[{"-", "1"}], RowBox[{"0.9917113149847092`", "\[InvisibleSpace]", "+", RowBox[{"0.8549235474006115`", " ", "s"}]}], "0"}, { RowBox[{"-", "1"}], "0", "s"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{{3.5020872724027634`*^9, 3.502087280702238*^9}, 3.5020873204825134`*^9, 3.502355697076891*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"MatrixForm", "[", RowBox[{"m2", "=", RowBox[{"Transpose", "[", RowBox[{"{", RowBox[{"\[Omega]z", ",", "\[Alpha]", ",", "\[Delta]v"}], "}"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.5020873377695026`*^9, 3.502087345456942*^9}}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ { RowBox[{"3.0970000000000004`", "\[InvisibleSpace]", "+", "s"}], RowBox[{ RowBox[{"-", "0.3618917292187933`"}], "+", RowBox[{"0.2590418348623853`", " ", "s"}]}], "8.8`"}, { RowBox[{"-", "1"}], RowBox[{"0.9917113149847092`", "\[InvisibleSpace]", "+", RowBox[{"0.8549235474006115`", " ", "s"}]}], "0"}, { RowBox[{"-", "1"}], "0", "0"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{3.50208734629399*^9, 3.502355697109893*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"W", "=", FractionBox[ RowBox[{"Det", "[", "m2", "]"}], RowBox[{"Det", "[", "m1", "]"}]]}]], "Input", CellChangeTimes->{{3.502087352433341*^9, 3.502087360735816*^9}, { 3.502087393166671*^9, 3.502087413468832*^9}}], Cell[BoxData[ FractionBox[ RowBox[{"8.727059571865441`", "\[InvisibleSpace]", "+", RowBox[{"7.523327217125382`", " ", "s"}]}], RowBox[{ RowBox[{"2.7094382132888515`", " ", "s"}], "+", RowBox[{"3.898451376146789`", " ", SuperscriptBox["s", "2"]}], "+", RowBox[{"0.8549235474006115`", " ", SuperscriptBox["s", "3"]}]}]]], "Output", CellChangeTimes->{{3.5020873971628995`*^9, 3.502087414114869*^9}, 3.5023556971428947`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Step", "[", RowBox[{"W", ",", "10"}], "]"}]], "Input", CellChangeTimes->{{3.502087426669587*^9, 3.5020874432115335`*^9}}], Cell[BoxData[ GraphicsBox[{{}, {}, {Hue[0.67, 0.6, 0.6], LineBox[CompressedData[" 1:eJwVjXk4lIsegD9rWXJDuSIMn4hUliSOmd8vQyI5OlEdKYwybdZSYo5dUkRI k7JrU9aGLqKx78LYbng4WcqkG6GylNt5n+d93j9fVYbXH6cFCYL465f/NDWI Iap36iaN+IcmK2odj2JzlHIWCMKr/EqGCKw2VIVTKFeBoIxQ5mK2gFRCaaH4 QBgQGat9Alp7IJUbqyJCiQbimMbGZncL0Pl86tYqMw6IOmf9uKd2MCyV9nOl PwGImN0DtlNHQf2R2O6l5TtA7BLjpRq5wAWqn8c3lXtAPHHnLCuehhc9oznz 9AdAWBuUy2Wcg6XzNkOzzHQg6BpZ6q7ekCEwFP3NIhMIVe/tV7kXwbz99pav /VlAOId3mnhcgQ9sy+r5szm/ftXZqe6BEHPqh9Pc8kMgNvWu9j8LBt7ymaQZ ladAJE68P34zAi43Kut+LsqFkASzoHNKUaCQ2NP6if4cCN/km0O8aGBoo9BH ZgEQ9Yaxns/jQHA54M08qxBCjO29p9xvQ8+og9K8RRFw7fKLpMUSwf+5RNmX /mIg/stgSYUmg3XCpOiXjBfAXY3dF32EDZv9q+1nz3KAuK34uME0Bbj0KzOf l0sgJMD8X4MmabBm8J3mJ5UyCKkS1nJlZcMAt9Jv+kMZuOh3KfAe50DuI3bt x6JycIm5Yf/z7UOw9bV15tNfAcW0ckb32BNIFitPfs98DS5LR7QnnuUB54q1 70V5Low6t2v+lCmAB3yjTXMsLri0sO3uYyF4dsowv1hUA148d+NkWRHIPGgS nO2vgc69fBO5Hg4sS5U+9TatBTv1cR2N7BIYD822m8moBe8uhl+wXymUMoPS Pp+tA5dipZxp8j/gaLDL5H/L9UBZc7+m7VEFZLak+3xUaYam2O8jY2nVMM8u 0R6JaYaQAvrL51o1sI/ZOta92AwDtsFiiqU1MC30zaGc1wJrnfNs+ni1sIdq axId1QbXxzcEHFRrgM6CFUHNz29APv/Hx3trWiG4Rcdaz5kHaYqRCqzpbnhS 9FLj2R0ezEQ4bHDaz4NutpnQljYe5F7Mn+7O4YE689greeMeMFW/rBTs3AMt QhE7CNlemB5IrHg82Aty1EGZNw190KO3RXLp0wDkF0QPXtjxFjpZw9wrPiPA l+HHWLu+hSZiYa9L3whoXrambU16C9eTW6FHaRQyTCUyxxbfQlC9jGtu+Cgk NMe4O9YPgmPFYZ+wQ3/D5bG4WUunYVCOZPhGLbyDdInWcGmLUZAFf2crp0lg Qte9ad8xuCsqE96V8Ak8J7TGOPlTMCmr66F06SuIq0ZojuyZgaF6delSl1W4 tb5VO9NlDjSKzDuYEsLIGLR/LdT2Fa5laFnOTK1Fn/oIhpfmEnB0WIY/OtZh kbfkYXmrH/CnwyRjt4k0Zgae5+seJfBm2f0g/SZZDEtfOTQ/LYCBphr6DXpy SPBG8VWAEH4Q3hFcnCSPGpfc/e21RXDeQy7/ha4iji/cPSJRKYpwxvvE+hwl tJ4491eCz1r8GpgcOKlJQdvx+G3KyuLISGXd2XhVFfm1jJCmPAmUMLqQ8pKj hjuk+5TozuvQaErZgyKpjuKw4Do0J4X+KoRU6MEtaPnJ8Zuaw3oUvVHJDM/V wIGaUwKOOtLodUG4pltgK5ZcrztJWZDG4cmysmQzLXQX8Rvt6JBBiUIrs840 bXTzDSyRTJFF+qnOv63Ht+FO5rYOG9cNeK3mTOUTcju+kdGR8DPeiI0PKm3c gnZgRX7YfR0hOfytju2jVbMTAwW07dqG5VD+qltOZrwuig8F7Pfk/BvTzRe4 UlQ9nHikmpTOkkdKsWvc7LAeJm3dJFzmsAnPlwbx/GP0MT7FvdGVooB9dR8u ee00QMekEx2S7xUQQtSsjN8Y4Hfzh4vpVYr4+x9ro3NYu3Bswsy/JmozKkaO xPsrG2IWVU+x3VUJ5cQa+dPthpgX6SfN3K6MZ8WdHBt9dmOUg9sBoQVlLBkR MPOSMULDocynUe0qKFGbtL2Ua4Rsrft57Qco2B2YxnBx24PB3Fj2gTIK/q4X ovZU1hgPKjo8bFFXxZE0/6hKrjHu9Ww8Lh2tiuYCjlEGDBNM38xQb1tQxZM/ L4daSv+G6rWPk22Pq2EwYeHxivMbxm+v0e6uUsN9yMtatjdF9znhrmZtEg1P K4UOCFKRUfSFEh1HotoKPXPjQypeCDu8Yn2bxPKxw+v5j6nod5jTL5lIYkWX Z3BVLhWvL/jdik8mkZ9ef4JZSMV848Xlu6kk1it/VSiroOJi9Wrfo2ck7ow+ ftepm4rx3ZKxdY0kdjMIdvYqFVOyPc5cayZRLtJ1rb8gDbMvddD3t5KYU9jm byNCw1K5+KXWDhJjRar/XBCn4ZCj7BleL4mivZTNlnI01BzbRH83RmJifGkW X4eGupwA5ZwJEr+0cmRf76ShSeTg4un3JJamvIpI1KehjWZq4RSfxLzeD+6m e2joe56iPDtLovdi8bZbdBqyTEMXi+dIHFrz4wFjHw0j173rubRAYrW3nZSR FQ3ZBdk3v38nccpQdnbEloZZIcLM8iUSDSLCGJxDNHx26LQZa4VEQnqZd92e hhy1BiXaTxLdelkWJ47SsGpOY3F19devZc1LPUca/h9Di5QK "]]}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesOrigin->{0, 0}, PlotRange->{{0, 10}, {0., 30.352321090127987`}}, PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], Scaled[0.02]}]], "Output", CellChangeTimes->{3.5020874464347177`*^9, 3.5023556977549295`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"BodePlot", "[", RowBox[{"W", ",", RowBox[{"-", "2"}], ",", "3"}], "]"}]], "Input", CellChangeTimes->{{3.5020875243681755`*^9, 3.50208757812825*^9}}], Cell[BoxData[ GraphicsBox[{{}, {InsetBox[ GraphicsBox[{{}, {}, {Hue[0.67, 0.6, 0.6], LineBox[CompressedData[" 1:eJwVxXk01AkcAHDXGJNjxswQ83tZmsk1K1KiWL+v2xC5m58lspF4ixxpZWWE Yr2UXlKs1/SWt5tJlKs25mulLNXaIlI6JKZDJUeutt394/M+JjHJQbEqSkpK fv/5/4jeD3WNiWz0blzI2csVgadeniY3no3F/QdTslkisInmJO7fzcZ88ZNd pVoiUJu3s3SMZKO8Gdyb1UQgMzn46w1/No5w0unKc96wfIBWM7SBjSnxUUcq Br3hrBmv+vMnXbQ0lCTeKveGoXy346J8XWxhGTQLDL0hXJh1KKGIhYtmU6VX NbxAEdfcHebMRE41f2fYKk84VV65npGmjWca7KIULA8IrRZdvJOriUvXbpZ6 qbiDy15f7r1LDLz8Ot/vHM0NQEvvhKKVjkXxiYV1My7Qdle1wfpPGu5LmwnN nACICPFsbVlWxfELGY9UH5DAuRwwsJ2uglwt9rbMK9/A/L36h+ablPBq7G3r jCuO8IvpbpXYgRX5VDRtevraFsjbsZRd9XFBTk1U9q89aQ9tOg49wcFz8vnh piOcYjvg7qeR1nHT8k86kyVpvhuh22Hr7JD+G7kXs/SwlLEB2GVtmoETL+Q1 3PcxPh1WEHZaNivYNCyPa/LpThs3h7+9tCz8fbvk/oV9pt85CKDVsTDDQNJG kiO9VZ0aRrDiYexcXzVILvGLFNePc2Bwn/Gxn+hj5N7SVJGApwrR0bq1mY9f kUbxcjue5iP5GimlY1v+gfRcXPx9OJGBBsHRtFvCWbKSGOddtjDAqZChfnvm AjmTeHTeoGUtJvTX9pk3LJP3M6xkyb4W2Fk5cXau+guptP8JZMbbIJf7rqyh XRmMDvT+Ne+yCYnVeim1xapQsvPZnukZe2S6ptsX59Cg3EThtX2VEw79dkh/ fSAdNpJ8Nl9BounH2GApjwFJYXlnPEddMCYmP0tFUxPy3302Y864YSpz+1X+ iBaElw/UjE54YPJ44Jhtvw6ot5dMTtK80fhgrq4kiAXtfAfjZmUf9E3vjg5w 0AWph2nD8owvJklMa8o3sMFh9NndLpY/Lski55x4HPALUE8YUAvA7LcNW8P1 udD7UpKcoR+IrlXT659q68FFf/UjfH4QpiZoWN+Y1YO4gVtOfWuCsWKbo8D4 vT5ws14wKqxC0NzPfd3j4dUw1hlxMlwYiivtWwe/tBtAT4Sjj4kgDG+6+mWd bTEENaZkfJXtDlx6aSc8Vc2D0JORIoWVGDc7NShJz/Ogqrbx9TZbMaaWWT6Q 1fLgsbJWSeNmMb5y/kpyo54Hf0Tev5tFinH4tMbQTAcP/vGvC9EOFGOz6FFe 0FMevC3M2GWbLsaUi7kjTGMCLKv4h7KviVGmunyJEBCgvGJh8rxDjAoqo8DM nIBiJ7sujy4xRqkn2JA2BKQ6hNOZt8XoHxVcmAQEuGmPlkpHxSjUNbW9E01A z3y79KYShXF7ztEf7ibghw/a7kIahefbeaPj8QQc2xwzUcqgkJfAPLqSQoCo YLWQYlOo0bUwKpQQ0OHc1PSGT6G7YdoV+wICOmXrdgSYU5ibPHXUrYiA6/zK xaavKfxEjG389gQBfK0y5xw7Cm1TIxh7ThHw4/ec52NbKEzqefAk9QwBda0V h72cKbxgFNiU8zMBd8ZMTGWuFE6k9xUVSwnQnazvYXlR+C/TZyh9 "]]}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesOrigin->NCache[{-Log[100], 0}, {-4.605170185988092, 0}], CoordinatesToolOptions:>{"DisplayFunction" -> ({ Exp[ Part[#, 1]], Part[#, 2]}& ), "CopiedValueFunction" -> ({ Exp[ Part[#, 1]], Part[#, 2]}& )}, FrameTicks->{{Automatic, Automatic}, {{{-4.605170185988091, FormBox["0.01`", TraditionalForm]}, {-2.3025850929940455`, FormBox["0.1`", TraditionalForm]}, {0, FormBox["1", TraditionalForm]}, {2.302585092994046, FormBox["10", TraditionalForm]}, {4.605170185988092, FormBox["100", TraditionalForm]}, {6.907755278982137, FormBox["1000", TraditionalForm]}, {-3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.506557897319982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.2188758248682006`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.8134107167600364`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.659260036932778, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.5257286443082556`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.4079456086518722`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.203972804325936, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.916290731874155, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.5108256237659905, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.3566749439387323, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.2231435513142097, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.10536051565782628`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.0986122886681098`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9459101490553132`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.248495242049359, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.551080335043404, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.684611727667927, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.802394763324311, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, {{-4.605170185988091, FormBox["\"\"", TraditionalForm]}, {-2.3025850929940455`, FormBox["\"\"", TraditionalForm]}, {0, FormBox["\"\"", TraditionalForm]}, {2.302585092994046, FormBox["\"\"", TraditionalForm]}, {4.605170185988092, FormBox["\"\"", TraditionalForm]}, {6.907755278982137, FormBox["\"\"", TraditionalForm]}, {-3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.506557897319982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.2188758248682006`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.8134107167600364`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.659260036932778, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.5257286443082556`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.4079456086518722`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.203972804325936, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.916290731874155, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.5108256237659905, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.3566749439387323, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.2231435513142097, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.10536051565782628`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.0986122886681098`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9459101490553132`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.248495242049359, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.551080335043404, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.684611727667927, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.802394763324311, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}}, GridLines->{None, None}, Method->{}, PlotRange->NCache[{{-Log[100], Log[1000]}, {-101.11039940910656`, 50.15946948188008}}, {{-4.605170185988092, 6.907755278982137}, {-101.11039940910656`, 50.15946948188008}}], PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], Scaled[0.02]}, Ticks->{{{-4.605170185988091, FormBox["0.01`", TraditionalForm]}, {-2.3025850929940455`, FormBox["0.1`", TraditionalForm]}, {0, FormBox["1", TraditionalForm]}, {2.302585092994046, FormBox["10", TraditionalForm]}, {4.605170185988092, FormBox["100", TraditionalForm]}, {6.907755278982137, FormBox["1000", TraditionalForm]}, {-3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.506557897319982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.2188758248682006`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.8134107167600364`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.659260036932778, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.5257286443082556`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.4079456086518722`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.203972804325936, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.916290731874155, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.5108256237659905, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.3566749439387323, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.2231435513142097, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.10536051565782628`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.0986122886681098`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9459101490553132`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.248495242049359, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.551080335043404, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.684611727667927, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.802394763324311, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, Automatic}], {189., -118.66252583997979`}, ImageScaled[{0.5, 0.5}], {360., 222.4922359499621}], InsetBox[ GraphicsBox[{{}, {}, {Hue[0.67, 0.6, 0.6], LineBox[CompressedData[" 1:eJwV03c41d8fAHAze9xrk0iSEYlkfnMqSpFC7r1lc++naSQkyYxSSqmMjKwi K0lGpfu2GtKSTTJCVtlbfuf313lez3k/5znvtdHV05rBxsLCYsjKwvL/075+ Iu/ZGTIYbs0TULpPgX1iYXyiJ8nw6MxzbX1sTWeRM350MshKkM5YYHPM6aga OpCB6c8neB47f+OlnFpLMrz/W6pUhb3sz/modTsZnCTGipzjKPBgi3Tq6jwJ eBzGkwriKXDFO2/VaYYEvrWy/DXYHpVGDtUTJPhc8yKmDXuPjdP6q8MkkGtw /caeQIHhoKwHwp0kGDiQhuyw9Vo04je9IYHAL2q3QCIFWq/svX3gCgmqX96K D3tAAW8nFlHHEBJo/HuTkozNb1AZ7x1IguFF/8pSbPR358MkHxJQbf8cGMXO OaZaOE4ngVZCeqJtEgX8NUgNd0xJUFxxV3VbMgUk27q5OtaRIM1D5eNcCgWK i5Nu/GEjQW/Gwg7RVApY3KQJsa8JQ3V35qvt2CF7GsW3zgtDZtaanDv27/y6 zUFDwuCwNLJ/ALsiNH+vwnth4LHpVe98SIHjagHBp6OEYe+e5wrd6RQIKOAK r4oQhs25S2qr2Enb7kdKhgnD6+ZCq/UZFOjSLrr5NkAY0sLqpo5jOxgNJimc FYb3BVG32rGdD1mXd1gKw7dP2Xu7MilwwlN18qCoMPy3IOa28Aj/h3hRR9kl BN4Poqvu5FIge40Wo6IrBMMeVv/KsImEFdrKNiFwe0s4dGP3f9g7lr5RCCb/ rIap5VGge2sjeZxDCNAL5PkO+/vUH6fwj4Jw7b+rQ5wFFHgTpLz0lCYI4op2 eqlPKXBZoqEmzEoQFKobVt5jGxV53rQ9KAjP1JKHprErekvllw0FQerZD82D RRQoMTHdv09OEIbtnt9fwM7ldb3XNSAA3p0W7+yLKXA/LkmD57wAlDe8rdv7 AsdbxiF0RgAOxcTmXsD+vu6O9QU3AZjx6KjKwyZdiPQbsBEAvUMZ10RLKXCT eu5N1Q4BeLjrQuBv7AjJ/ZYBc/xw7MS88oNyCvg+mHIfvcgPh5otVze/poBt 6oGCTyF8UOaYeXG0Bvf30cCbqIt8YPZkdrtKLZ7//NCvpt58wNQ1UjiBzfGq YrrSjQ9yajzz+rGLW1UMCvfxAal+lfGzjgLCJN53t/j54FBmcU7vOwp8DK/v OZzAC2zLn5vJDRSYu05M8d3hhbH2wkkqtkIsG8f7KF747r7FIgU7IM1gC7rE C2lPaiqVP1FAuTLXXdORF5aH2hP3fKZA5Nz1JWFFXmg7kH8i7CsFdp8yF218 ygM+idWz2s0UaIjZ5TGVzQNHEgcbr2LTSre/J6fxQNTKfrYubC92yUCb2zyQ r8F2LKKFAmkpv/qbvHhgzV3ub2crBVgaLz9v3c4DH+csORM7KAAGRdY/nnOD dVjfJtsevA8umfmredxw4/vS7+fYbVfj1m3I4gaLuB+8Ir0UmGgKfOl4jxtq Jk8SjdjyngcUeny4IeGxX6RtP65vZt9knw43ZN24/NJ9EO8rv9id32VcEC2l fuX3GAUOvrtdoF7EBbpGGelW4xQ4GsZf753DBc8s/mx6hX1ygZ19NYELlB2u 0mL+UCDm15QPKYALRmFHtNEEnt/XX2kGRlxw3PqId+40BQLdo+WjYR14+o9P tixRoPwze9G2D5yw5uibHcVLhc9t8g2LVZxw5s/wxnV8VBjo++93zUtOuBqy gS8cmzx/QZ6WzwkMs31qQfxUOCs3djskhhMilsULLgpSYaNX07lvtpwwMznE F0mmwnXSI+3zfRyg+XH73zlpKtgf3VdWuswOrtadpCPqVPh++aXMwDQ7fNXN uryAfTBbI0RkjB3Sb9y7nq5BBb0l8QNeXexw1kP3+uw2KoikDXWoVLLDW8ti zUdaVKgfvfYvOYgddi8dTtmkh+PDP5qGs7JDqOmSQvpeHF98pOkwFxsYWBhX V9lTIU6V0GNnYYP3YzTBKAcqSGdeSi5dYIVW1n4eK0cqKNx7TJcdYYXfamGk ficqaPqtzIw0sMLfxTveQm5UsDDIEYuMZYXllm1LUaeocKV6jfJalhU2opyN vBeoMNdY2K68gwXEcnV7qPeosPDTgoVVnQU6D1VXHLxPhcWxEaX2zSxgn+7o vCuOCivrtvhESbBAwxcVCeUEKrD77ZJtml1jBu/PMuRMxv/bJ3eVEr7GbG7L GBjMpILZYM9xu9R/zGu7bKfNS6iQpURnYzStMOdcbOWZrVQ4GWzZ86N2hWlm yu7L3k4FtTa9N5QXK0yS5MZhsw4qFEcJBJjFrTDvTrZqtXZRAcZKJ9VoK8xB CRdX1j4qdBXz9E51LjO7ujT7o8dw/YyfMkP6l5iZkocnI9hoEEZdCkyeWmAe jedhqmnRwMlyy3G5XwvM18aX5TK1aWBkelQ3o3mB6fxzJUtGhwZzWoWT2eUL TO2Z8xuF9WhwStCVeB60wHxn5DWxbhcNjtR9OFzPu8BU3GBJbD1IA1ntRIUF hXlmTfz2mONuNCgX1HtvYzPL7M1MoDgn0oBiIrLz4d5ZpqJPoZ55Eg2mL/7J HNGeZVq/3Jegm0IDjYGs4FDRWeaXJ73fRNNpkPWKpPu0eYZpbxhn2JtDg5iT o494aTPMLc++HagupwFRnRpeZT/NfL1jZia7nQaifpzG24hJJp1klCUkfwzq 9AxmWsVHmTcnszVlXh8Dcmw5n9VgP3OCJC/q4XIcKPH5M4o72pjaQ0UKbkp2 8G0/v4qleQ2zbim+6MOIHZQZRvpKhpYbW0ksKe5psIcVU/ldhcnNxmLf7cOE XjtA8zn5Wze4+oxjUzQ1R144grMz6fGFrmFjhReiG3+POIFs+jFBrbgJYy+T fUOOCc4gaePM+U5txvimyfmMAFMXGD/a+lVXaMGY77tIPjeXK5z++vijctGy 8QtnzryWUleoShp8MJu6Zvx4+XbUQcINREX/xBZVsqJuf30lrVU3kC9yPf2r lhWRwoRt9dfcYKtF627JBlZU3PXYyJiVDiZXYCK4gxXJjo3q7Oekg+9MrOXh eVZUmXHw634BOrQ06fL+0WRD3hVTj/lk6ZBwPzRULYsNDRYr26Ua0kFGQszr 8XV29PpoSNOiDx3e3tVa841lRyZuiRLNfnTwFj5yy/QBOzouqfG70J8O9Tw3 8n89YUfaPFXajoF0CFhhGVb4wI7UQx6F5YXToa13zOUhFwe66LjblzWWDvfz a20SrnCgqbzd2akFdBDa46N7PYgT8d9bmKjqoUOh58TbpghOpGwWfFOtjw6W KWcpcjc5UZFHP++9fjpEL9B9S5I4UWBEaa7LIB24n9o+7y7nRG6IGfN3lA6s 63W3aU9zIt3X5gEtc3SYnl1U6jqxDoWVO+o38zGg9UmwuIYVF7JbNKO81GLA wp7z/TY0LhSZpGDfqc0A6S6i6KITF2qaOee7vIMB9oKWB+vcudBKx+AvPV0G 9HivD7K/zoXKI46/zzFkwIhhxcD1Gi50K7hG1cGEAf8+TZUM6XCjRmX9rPW2 DFCaYtikS/Ogf8buOyV9GDB0hq3NVYEH6Vt0fhH3ZUDOQKq9oioPiiwgh4j6 MUC1vZWRrc+Dxmq+bhHwZ4AGHPAvoPEgBSe5J9OXGKBzSz2lIo4Hme+NF48L Z4CJ6uzgNzIvWt20LVsnlgGurlcC2Pj40JpTXNm6AgaI3wxe20XmQ98Ok6Rq sOvLAq5ckuJDkmmSLUGFDNAWOHdrZgsfWrDpo888ZQBHuUPGoAm+rxruby1m wGMB3fr6ID4UI77YEVKO8y0flro7xYe01Z/pONYwwFvocMWmDn70JF+/0aWV AW+lp2eXe/lRUbtQAWcbrqdSvFbTMD+SuPp3JAe72uhn3pVFfsSymTd2vJ0B 5NOeqQOSAqhR1jzFs4sBz2pjwrOpAujnk9BN1F4GTFz8ekitWQAdXdhQUjbC AM9fVn1aXwVRBaklt3OZAaVpR+UiWwVR3rn1ozYruP72VPv2bkEUxz385iN2 dLN9S/C4IGpKuKPwcpUBuW9P1DfwCiFahf+vO2sM+JVzuZgwFUKQdSpLnZ0A mvuTsAcvhVBl3Le7krwEyF8KIYVaCyMW6xn9L+IEcMZUWkpShFFaR5yBugQB IxlLN54eE0YdPE+HrmM/r/dZ1+0sjD5vopuZShKwT/rUsoGnMIKoz2qlUgSc qbAamLkhjBpWDlRcW09A6bxCxck6YeSdtNQ6tZEAc5865yN6JDTiVlY8rEZA yELLRR0jErrvlL3PcCsBJYG/Y6URCS2xv7wRjb0hgq/u134S+vLaR1VDnYCJ +1YqF6kkpPTXo9pdg4B7ZT8m0/1I6D2DP6Vbk4Cupdmw6RISWpWqm76mQ4BH qNKjuO1kROt14RHaRcB6xxO79HXIKGO6vP4gdr1BTmunHhmZNHBRIrG3zKjw bkRkNPPJ8uMKdg+h7plnSUbKT9/qDBkTYGWxQx/OkJGI+4J28W4Cdkjs+TT8 iIzKVd5IKZgS0DcdRkQ/IaMX7hM+VOzbX2vWNArISPFa58No7PEoUy2fEjKK HI9izGE/XjGL/1dNRtHf/pW820eARN9hF5EeMqqUvRrlYkbAUr7DrJG0CHrv 7aJ23pyAhUXv0+obRNDWG+4fHmPP7bv2U1YB36+07ujAnuop/vBPRQRVxN70 QRa4f6LcqaAvgvaXtCXzHiKgI7B4n8kxETQ99d+r+5YEvLLgSjBPEEFryMr/ mhUBLxPXCxgliyCtkQsbSrHLB7eHbU0TQQy/xvh+7JIQ+7MCOSJo8Wgjxy5r AvJLnqEvZSKorLSyYQI7eb39sHWrCFpn+kbf8igBgWNFBsfFRdEm8595wxQC DP+GWupJiyK7ZDNLEhXnN2ntKr5BFOmFB9XrYfvPz0Q1bhZFVS19R65i+7Lp tx/UEUXFNlGJCjTcT8mqC4ZHRdExx5f61scIcDL5VrI+VhSlqmzJjbMjYE/y pMZPATH0dEol4pUTAZfmJ6sDSGIoZHPo7TbsEuspiriYGAreXhY6i72ZZzro 0HoxxJ0hK77NmQBuv5nPr1TF0IlxJ5507M+H5z0S9ouhhtst6iEuBBxnXy20 ChVDvNpmfFvdCPA+zb2tdkYM6cicf7OLwPno/EgtWBBD36YFe6nY4azFgvEr YuifxOZRL+x7CXZ/TnGII+m3cqUZ2GVvCwuERMWRofGgCucJAlYUbLfaaYuj ti/KKXXYEZ3pKlPnxFGk/EUrnVMEJFgYKsr/FUejXTMZTWcIeOBlLPpuShwR KvYcQ9jJ9/ZyeMyJoygTDttF7PQu81+vVsURuc2mVvYsAbln7bOo/BIolyuh i4H9OvqyYoyKBGLa1rJMY/c0MBX/uUmgJw/dL7N6EKB8yGRzV5sEOkYlWUx5 EjCqxFHi1SWBlLcOZbJ4EVDIUruHs0cCCX0e+yOIrVOy11ljSALVaL9wVMPe I7M3KWRWAsWd8H/shu0wvJu0mSyJHvrF9XzDjo0wXnU3l0RS15LNH53D+Vca NK9VSqJNinq7Vc8TIMT9xbivShJdaOp6thNbwdott7ZOEqVuOC++F9ts8EZw 1CdJNKqR+coO+77gDxWRH5Jo7qbthWhsDafgIKUVSbROm/XNKLYLS+2WQwZS 6HO0cku6DwFv9xwKeFAqhbyKD17+40uAzYAww+ClFDK5XpMwj91ztelwR6UU 4ohdy2PxI2CxwW6zdJ0UEp7vriBjb6We/pr4XQqRuXl9dmLfPXNVKXECv895 /mQgtvO9qsZ4VWkUknQgnO0C3v+dEZW6GtJo3kLyES92QLtZTut2aaS+eINJ xr674etlCX1pNNAa2K2A/TanWzl+vzTivfhf3R5s9crloDi6NBJVHzcMxV4a 0FG7nyqNuITclxawdxoVsaRnSCP590JirP54PmNVW/IfS6M0hStbeLCHd8mF 1hZKo9ZXbDuksNviuVun30gj70KjMT3sFwc6w6x/SqOzKsU9ftheBSEdQvIy SE7RR3gcO599+amMogxyUSjcMYP9+5hvxBZlGfT8crHVMrbTutOaxpoyKNBZ 14/nIgGWTjaRHkgG3fmyfGozthpJSeuTswwSOpHNZo9NnEjjaqfLoD25PaWu 2BmV0j9+nZRBR4/b0k9hS58WurbiJYP4Lfnz/LC5axZ+qIXKoBVZj9+3sU2k zj/XjZBBC7HoRDx2iOf4tb1RMojV4crPFOx5mT5tuzsy6KNbwOtcbC1ve54T 92VQ9gf9jc+wPd63dHsnyqBvLVeCy7BzN1iVBKXIIHMh19ZK7EGfj1HX02VQ 0ESrci32/wB2b5y8 "]]}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesOrigin->NCache[{-Log[100], 0}, {-4.605170185988092, 0}], CoordinatesToolOptions:>{"DisplayFunction" -> ({ Exp[ Part[#, 1]], Part[#, 2]}& ), "CopiedValueFunction" -> ({ Exp[ Part[#, 1]], Part[#, 2]}& )}, FrameTicks->{{Automatic, Automatic}, {{{-4.605170185988091, FormBox["0.01`", TraditionalForm]}, {-2.3025850929940455`, FormBox["0.1`", TraditionalForm]}, {0, FormBox["1", TraditionalForm]}, {2.302585092994046, FormBox["10", TraditionalForm]}, {4.605170185988092, FormBox["100", TraditionalForm]}, {6.907755278982137, FormBox["1000", TraditionalForm]}, {-3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.506557897319982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.2188758248682006`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.8134107167600364`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.659260036932778, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.5257286443082556`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.4079456086518722`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.203972804325936, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.916290731874155, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.5108256237659905, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.3566749439387323, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.2231435513142097, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.10536051565782628`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.0986122886681098`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9459101490553132`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.248495242049359, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.551080335043404, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.684611727667927, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.802394763324311, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, {{-4.605170185988091, FormBox["\"\"", TraditionalForm]}, {-2.3025850929940455`, FormBox["\"\"", TraditionalForm]}, {0, FormBox["\"\"", TraditionalForm]}, {2.302585092994046, FormBox["\"\"", TraditionalForm]}, {4.605170185988092, FormBox["\"\"", TraditionalForm]}, {6.907755278982137, FormBox["\"\"", TraditionalForm]}, {-3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.506557897319982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.2188758248682006`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.8134107167600364`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.659260036932778, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.5257286443082556`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.4079456086518722`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.203972804325936, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.916290731874155, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.5108256237659905, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.3566749439387323, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.2231435513142097, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.10536051565782628`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.0986122886681098`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9459101490553132`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.248495242049359, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.551080335043404, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.684611727667927, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.802394763324311, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}}, GridLines->{None, None}, Method->{}, PlotRange->NCache[{{-Log[100], Log[1000]}, {-179.80519525695485`, 0}}, {{-4.605170185988092, 6.907755278982137}, {-179.80519525695485`, 0}}], PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], Scaled[0.02]}, Ticks->{{{-4.605170185988091, FormBox["0.01`", TraditionalForm]}, {-2.3025850929940455`, FormBox["0.1`", TraditionalForm]}, {0, FormBox["1", TraditionalForm]}, {2.302585092994046, FormBox["10", TraditionalForm]}, {4.605170185988092, FormBox["100", TraditionalForm]}, {6.907755278982137, FormBox["1000", TraditionalForm]}, {-3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.506557897319982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.2188758248682006`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.8134107167600364`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.659260036932778, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.5257286443082556`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.4079456086518722`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.203972804325936, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.916290731874155, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.5108256237659905, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.3566749439387323, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.2231435513142097, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.10536051565782628`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.0986122886681098`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9459101490553132`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.248495242049359, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.551080335043404, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.684611727667927, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.802394763324311, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, Automatic}], {189., -355.98757751993935`}, ImageScaled[{0.5, 0.5}], {360., 222.4922359499621}]}, {}}, ContentSelectable->True, PlotRangePadding->{6, 5}]], "Output", CellChangeTimes->{{3.502087532534642*^9, 3.502087578890294*^9}, 3.5023556980869484`*^9}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["\:0420\:0430\:0441\:0441\:043c\:043e\:0442\:0440\:0438\:043c \:0432\ \:0442\:043e\:0440\:043e\:0439 \:0440\:0435\:0436\:0438\:043c", \ "Subsubsection", CellChangeTimes->{{3.502087612413211*^9, 3.502087620219658*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"c1", "=", "0.233"}], ";", RowBox[{"c2", "=", "29.5"}], ";", RowBox[{"c3", "=", "4.23"}], ";", RowBox[{"c4", "=", "0.3"}], ";", RowBox[{"c5", "=", "0.075"}], ";", RowBox[{"c6", "=", "7.48"}], ";"}]], "Input", CellChangeTimes->{{3.5020876633241234`*^9, 3.5020877039874487`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"\[CapitalOmega]a", "=", SqrtBox[ RowBox[{"c2", "+", RowBox[{"c1", " ", "c4"}]}]]}]], "Input", CellChangeTimes->{{3.5020877110078506`*^9, 3.5020877383824162`*^9}}], Cell[BoxData["5.437821254877729`"], "Output", CellChangeTimes->{3.502087740497537*^9, 3.5023556981469517`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"\[Zeta]a", "=", FractionBox[ RowBox[{"c1", "+", "c4", "+", "c5"}], RowBox[{"2", " ", "\[CapitalOmega]a"}]]}]], "Input", CellChangeTimes->{{3.502087747473936*^9, 3.5020877853071003`*^9}}], Cell[BoxData["0.055904743048939276`"], "Output", CellChangeTimes->{3.5020877863931623`*^9, 3.5023556981799536`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"k", "=", RowBox[{"5.84", " ", "c4", " ", "c6"}]}]], "Input", CellChangeTimes->{{3.5020878019080496`*^9, 3.5020878135877175`*^9}}], Cell[BoxData["13.10496`"], "Output", CellChangeTimes->{3.5020878142417555`*^9, 3.502355698213956*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ FractionBox["c4", "\[CapitalOmega]a"]], "Input", CellChangeTimes->{{3.5020878344489107`*^9, 3.502087849422767*^9}}], Cell[BoxData["0.05516915432461113`"], "Output", CellChangeTimes->{3.502087850144809*^9, 3.5023556982479577`*^9}] }, Open ]], Cell[TextData[{ "\:0422.\:043a. k < 15 \:0438 ", Cell[BoxData[ FractionBox["c4", "\[CapitalOmega]a"]], CellChangeTimes->{{3.5020878344489107`*^9, 3.502087849422767*^9}}], "<0.3 \:0438 \[Zeta]a<0.4, \:0442\:043e \:043d\:0435\:043e\:0431\:0445\:043e\ \:0434\:0438\:043c \:0434\:0435\:043c\:043f\:0444\:0435\:0440 \:0442\:0430\ \:043d\:0433\:0430\:0436\:0430." }], "Text", CellChangeTimes->{{3.5020882154737043`*^9, 3.502088277301241*^9}}], Cell["\<\ \:0420\:0430\:0441\:0441\:0447\:0438\:0442\:0430\:0435\:043c \:043f\:0430\ \:0440\:0430\:043c\:0435\:0442\:0440\:044b \:0434\:0435\:043c\:043f\:0444\ \:0435\:0440\:0430 \:0442\:0430\:043d\:0433\:0430\:0436\:0430\ \>", "Text", CellChangeTimes->{3.5020879562718787`*^9}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"\[Mu]", "=", FractionBox[ RowBox[{ RowBox[{"2", SqrtBox[ RowBox[{"c2", "+", RowBox[{"c1", " ", "c4"}]}]]}], "-", RowBox[{"(", RowBox[{"c1", "+", "c4", "+", "c5"}], ")"}]}], "c3"]}]], "Input", CellChangeTimes->{{3.5020879608361397`*^9, 3.502087978973177*^9}, { 3.502088145177684*^9, 3.502088158383439*^9}}], Cell[BoxData["2.427338654788524`"], "Output", CellChangeTimes->{3.502088159997531*^9, 3.50235569828496*^9}] }, Open ]], Cell["\<\ \:041f\:043e\:0441\:0442\:043e\:044f\:043d\:043d\:0430\:044f \:0432\:0440\ \:0435\:043c\:0435\:043d\:0438 \:0444\:0438\:043b\:044c\:0442\:0440\:0430 \ \:0432\:044b\:0441\:043e\:043a\:0438\:0445 \:0447\:0430\:0441\:0442\:043e\ \:0442 \:0432 \:0446\:0435\:043f\:0438 \:0441\:0438\:0433\:043d\:0430\:043b\ \:0430 \[Omega]z\ \>", "Text", CellChangeTimes->{{3.502089003918801*^9, 3.5020890067279615`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Tb", "=", FractionBox["1", "c4"]}]], "Input", CellChangeTimes->{{3.502088980599467*^9, 3.502088985985775*^9}}], Cell[BoxData["3.3333333333333335`"], "Output", CellChangeTimes->{3.5020889868678255`*^9, 3.5023556983179617`*^9}] }, Open ]], Cell["\:0421\:0430\:043c\:043e\:043b\:0435\:0442 \:0431\:0435\:0437 \:0434\ \:0435\:043c\:043f\:0444\:0435\:0440\:0430", "Text", CellChangeTimes->{{3.5020882922310944`*^9, 3.502088300392561*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"MatrixForm", "[", RowBox[{"\[Omega]z", "=", RowBox[{"{", RowBox[{ RowBox[{"s", "+", "c1"}], ",", RowBox[{"-", "1"}], ",", RowBox[{"-", "1"}]}], "}"}]}], "]"}]], "Input", CellChangeTimes->{{3.502086292714729*^9, 3.5020863559183435`*^9}, { 3.5020863960746403`*^9, 3.5020864160587835`*^9}, 3.502088337500684*^9}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", TagBox[GridBox[{ { RowBox[{"0.233`", "\[InvisibleSpace]", "+", "s"}]}, { RowBox[{"-", "1"}]}, { RowBox[{"-", "1"}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.5599999999999999]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], Column], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{{3.5020864083853445`*^9, 3.502086416956835*^9}, 3.502088339640806*^9, 3.5023556983529634`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"MatrixForm", "[", RowBox[{"\[Alpha]", "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"c5", " ", "s"}], "+", "c2"}], ",", RowBox[{"s", "+", "c4"}], ",", "0"}], "}"}]}], "]"}]], "Input", CellChangeTimes->{{3.502086816999716*^9, 3.5020868435512347`*^9}, { 3.5020870184622393`*^9, 3.5020871299286146`*^9}, {3.502088355743727*^9, 3.5020883786730385`*^9}}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", TagBox[GridBox[{ { RowBox[{"29.5`", "\[InvisibleSpace]", "+", RowBox[{"0.075`", " ", "s"}]}]}, { RowBox[{"0.3`", "\[InvisibleSpace]", "+", "s"}]}, {"0"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.5599999999999999]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], Column], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{ 3.502087095202628*^9, 3.5020871305366497`*^9, {3.502088374013772*^9, 3.502088379009058*^9}, 3.5023556983869658`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"MatrixForm", "[", RowBox[{"\[Theta]", "=", RowBox[{"{", RowBox[{"0", ",", "0", ",", "s"}], "}"}]}], "]"}]], "Input", CellChangeTimes->{{3.5020871437744064`*^9, 3.50208716481461*^9}, { 3.5020872668724475`*^9, 3.5020872685785446`*^9}}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", TagBox[GridBox[{ {"0"}, {"0"}, {"s"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.5599999999999999]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], Column], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{3.5020871654136443`*^9, 3.502088385246415*^9, 3.5023556984209676`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"MatrixForm", "[", RowBox[{"\[Delta]v", "=", RowBox[{"{", RowBox[{"c3", ",", "0", ",", "0"}], "}"}]}], "]"}]], "Input", CellChangeTimes->{{3.5020871754712195`*^9, 3.502087221239837*^9}}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", TagBox[GridBox[{ {"4.23`"}, {"0"}, {"0"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.5599999999999999]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], Column], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{{3.502087194501308*^9, 3.502087221840872*^9}, 3.5020883918537927`*^9, 3.50235569845597*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"MatrixForm", "[", RowBox[{"m1", "=", RowBox[{"Transpose", "[", RowBox[{"{", RowBox[{"\[Omega]z", ",", "\[Alpha]", ",", "\[Theta]"}], "}"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.5020872461072598`*^9, 3.5020872800412006`*^9}, { 3.5020873135241156`*^9, 3.502087319207441*^9}}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ { RowBox[{"0.233`", "\[InvisibleSpace]", "+", "s"}], RowBox[{"29.5`", "\[InvisibleSpace]", "+", RowBox[{"0.075`", " ", "s"}]}], "0"}, { RowBox[{"-", "1"}], RowBox[{"0.3`", "\[InvisibleSpace]", "+", "s"}], "0"}, { RowBox[{"-", "1"}], "0", "s"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{{3.5020872724027634`*^9, 3.502087280702238*^9}, 3.5020873204825134`*^9, 3.502088395226986*^9, 3.5023556984889717`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"MatrixForm", "[", RowBox[{"m2", "=", RowBox[{"Transpose", "[", RowBox[{"{", RowBox[{"\[Omega]z", ",", "\[Alpha]", ",", "\[Delta]v"}], "}"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.5020873377695026`*^9, 3.502087345456942*^9}}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ { RowBox[{"0.233`", "\[InvisibleSpace]", "+", "s"}], RowBox[{"29.5`", "\[InvisibleSpace]", "+", RowBox[{"0.075`", " ", "s"}]}], "4.23`"}, { RowBox[{"-", "1"}], RowBox[{"0.3`", "\[InvisibleSpace]", "+", "s"}], "0"}, { RowBox[{"-", "1"}], "0", "0"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{3.50208734629399*^9, 3.502088397834135*^9, 3.502355698522973*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"W", "=", FractionBox[ RowBox[{"Det", "[", "m2", "]"}], RowBox[{"Det", "[", "m1", "]"}]]}]], "Input", CellChangeTimes->{{3.502087352433341*^9, 3.502087360735816*^9}, { 3.502087393166671*^9, 3.502087413468832*^9}}], Cell[BoxData[ FractionBox[ RowBox[{"1.2690000000000001`", "\[InvisibleSpace]", "+", RowBox[{"4.23`", " ", "s"}]}], RowBox[{ RowBox[{"29.5699`", " ", "s"}], "+", RowBox[{"0.608`", " ", SuperscriptBox["s", "2"]}], "+", SuperscriptBox["s", "3"]}]]], "Output", CellChangeTimes->{{3.5020873971628995`*^9, 3.502087414114869*^9}, 3.50208840089631*^9, 3.5023556985579753`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Step", "[", RowBox[{"W", ",", "10"}], "]"}]], "Input", CellChangeTimes->{{3.502088411829935*^9, 3.50208842012941*^9}}], Cell[BoxData[ GraphicsBox[{{}, {}, {Hue[0.67, 0.6, 0.6], LineBox[CompressedData[" 1:eJwUV3c81d8bt/e49srMCpFNw3OQhhAyKkIqI4UmIpV8I1lZCaHSkoZRZrL3 vPe6w1Wy95Ytv8/v/nNf79c5n3Pez/t5n3OeR9bdz/YSAx0d3QwzHd3//1+E urNoXnxiRPf/X5vBoTqCjIWjjDfQyfTUHaYtG+00VD6UkQkCuvtra30UQeBJ +P6VgxIGdNHNt42vKcGLqhhpZpnHQJegUkol6IDa3MXYHc84oHuQoG1liuAX T+a/LXIC0P05pl7meRTk37LrbWwmA135o4uupJNw5dCtq6vSz+H+HplclUY7 KCT+yVk2zQC6/XFGVkfPwoaPRd+CZxagr15ZEbpukE3f93jV7CXQfQmInkq9 AIfbnyqskF/B/Tezyw8sPWE89Wj1sncO0OlrHV229YHoi9vOS5tvAM17nR19 7weETa+keekPQDc5nO/y6ibcbpTaN5efC/fHb+uMHQ4A8URi64xpHtw//+Yr jecOuKsgxinPLzAvKePNyXUfGDbvdC6HfIV5Fae/vh8fAPGPveSyWT7s2zm4 yubyEALzOEsXyQXg37Tgbrv1CMwTRlkWswvh/u6l1OKxSNgVWG234F0E8ZpB Q5UjUVBlGjA/t/kN/Hu5/fjE4oCVNqg0I10KBmOPxtnUkoBS9ePW9HgpjL+3 +DfjnQy5b1Nrp/LLoEj3t8z1rylgdd3KddK0Ag47ad1YcngOKexlKWOeP4Gy IPvtH0sW8Gc0MSyQa4BnLlHYZuYNbPJ8/+B/sBYUX4oSulvewvCD19bz2bVQ UtbdVv7xHXz3DM2c866Dtzd+f3gc8AHOauvsn92sh/0eKzhd3U/wsiXr2pR0 M1z/cV+vOKMAllO/qfRHN8O1FG8ii3ohHPFsHcKvN4PliFnEl6pCmGZctS8j tIAW+1532kQRGByy2v84og3a++dmTcyLoevLFoPSXCf0dni8Pm5QAfda1Mw1 XQnw+EFNq69+LbzPL1b8mEyACZaPJMfHtYBPNWFUaCNAQ8pZMxlaLch7nq4Q NSQCSUimUze0DloYw9XpBHrgb+vku5rqehA+ROPvbCCButJc6ppBEyB5j7lj 2ySINufSnv6vCbw5F1prtMmgMGB8/By+CSqoLP99zyZDza4olpfezeB+W2v1 xR0KRFHPNvM9bYHPXx7Trqj3Apfthw8jlW0wyT8ZbX6+FzLalukattpA6ba5 kXJSL5xWaAuZMmyH7IOcL4fWe6Hk8Y22lfx2SGiO9jhbT4Oc7aX896kd0KE2 I2KwRgPbRLEPJ7o6gDPesllItQ9MFe6CCGsnhDvwqHXH90E2u8lRieudcHso buGo8y8YK2lr/CnVBQVH5l8pxP2C7tDGSVb9Lpj7YG3HWPMLoj80mFKsusDL n6+4Uuk3sPtz7ue62wVntxNCdJd+Q1NzVOULQhekuC3tFVDshzCiIplxvAsI taf650/3w3WnmYvjm11gESVoklfZD8WTqExZrhuyOFsf8pn9AfHZo4E+Xt1g dCjY+b7LH2CyppPNDeyGPl9V3bmAP+B4ZGrDNbIbRPFPRtty/0DzO80L6m+7 4TvjwZ8H6v7An2uL6WZF3WCnO/0s99cfkLry82x3dTc8TbU4HokbANJ+Za3D tG7Y17Ilu7pnAOq/dx9TGeuGjs28jUumA2Di8nEgbLEbOFy580xvD4B1dCV7 FCse3sf/CC+IG4C/bQZT+nx4OFJz9ZzshwE4reK55CCOh4cKHTw7tAEgyLrH j6ngQc4xdOzq3wEQvdjSeloLD1WR6lV9PIOw4y0evN8QDy5lv1NPKA/ChPLC k2jAw9ZU7LUy40GoCvRdsTLDQ5okmO9xGgRikvqPB+Z4MDg5J5d6cxA0aYdn 5E/igXQ/a5MldhAMWnUzDU7h4VbBSeKtd4Ngcnh+ocIBD4LDO3nDVYOgwtwg WHAGDwVCX/871TsI769eOCTqjAfro24uNUuD4BPWkDd3Dg+zgTh9Te4hYNHV /Wzgiofo3CrebMUhyJ3XeraEYZU+/3EeNATEK7caZdzw0MQtW333zBCoNFLe V2HjntD9fPr6EGSP2H4huOCB7tVKGe3JEMyeui56AVs/lWlXX0vOEHxwSxW9 4oSHfZ7G26U/hkDqHqPh3GlsvWYPqQ+kIaA48HPN2OPBTS0aUueG4Pk+3b0e tnhYi813i2AbhieNv5GTFR7iF0gPbssOA8/9m8ttx/GgbLf16tL+YQhlNvpX fhjT+7tsnd2pYXC3tpPcg+l7WuzoiOkVbFw4XkwI038++AqL9n/DYP02oPY+ lp/I30+V5DKHwUdDbfmKKh5kjIuP8RUPw5Ugh5je3Xgoed3nTdc1DPScAkEt EngY91LK+00/At+HQsR1OfBwv9WivV18BO6nTLXn0+FBVP36bIX2CBwbNO0s WumGY0sV+9IvjUAbTRVnO9ANf+wHbaJCR8DftiJmtqcbAktYbwQ9GwEuU7Ye oZZu+HDX9ptj8whEGFY/Zc/vBpM/AaQjgyPgm3MjjPK6G3pNXqzqbo5ARZGB tn4K5le2cUPBvaMQU4Tb9SGoGy4n3K3sih8FFpedR/8d6AaGv6/6f34YxXQp qFpT6YY0xya6LzWj8C/r1haLeDe07BIwjVkeBU/lrtSNlS5Qffe+8fjpMWBq Dk24nNcF0+WErhrpcXBq/Fc3wNIF4VLrC/kG47A00vPk6UAn7HogJfDSZhxG c3nftBZ1gsURb/t7D8fhNM5qO+FMJ3zq+kc9MDYOwpccFSkZHeA7smeo6PME PHe9OPGKux3+uFDZqpsnwO8LV3B6TxucokSqtw9PgHrYkvy+F22Yz8eCRsQn 4f2eY99NVNuAMf8NTjhiEh5ftn+UbdoKqSGyRgGuU7ASdMF4DLtfqwXEnhvi ZkBfpr/2X3496MQ0VZqpzsDLk5anawPq4S1L4LDNkRnYPfWX1naoHqLXSRqX Q2bgzq+onzUtdeDQn9SQNj4DObY87nXjtTCZi1verJoFvu17WdaGNeAsXyXG 1jcLIcLuqh+Ya6DzhR8Irs5CBlVNMgFfDUXxHVFqe+cg76iCs6JvNdy7HS17 7vkcxFeoa7TnVQGHbLhSv8E8UFVbbXmfVULTwacaoWbz4Fd9j3XFvBIenc7U l7Sdh97t1VETukpgiC856uQzDyFXey3k/X7Axr9pT/IL7Ptg3quJLhVQIr7h dzt3Hp4NEJcNpSrgth5roFDxPGTUR21c7S+Hxauykae65uHo8JOZOI9ymOqz f9/JsADKfv2Z6pFlkLvm/tWXdwFGa16LfrMrAy9B/xLuXQtgJplXOi5XBsMn oppO6C6AjYjcyMW6Unjl+axr0ngBhLYDyYXPSsHtYQ7lsdUCvNoVX1VxpRT6 yirHGz0X4BB+vZd1VymkkVrnPW4uwHtO6uWTKyVwepGyxvxgAYb5Tn52wpeA MM8o3ZuYBXhUmEWn8bUEiHuW2A6nYevVoPTWuBJIMKPjG3q7AEEXqpO1r5WA 9XlusbDCBThMKhzxsiuBtlSlPVVtCzBGweebyJRAVJGOpit1AZ5bxvpOspXA sS5jw38jC+BnW0nvsVQMLNNWxi8WF0Ddm+f79/5iqGN1Pn5wZwEcOfsKf7UX Q9hubxsa5yI44zXp+34UA4LbZ+6ILgKTWP2Dgi/F8O/sw/NiCosgI7Sycv51 MVTcjvcu0VwEQy/8zmRqMdxJeHHN0WgR6BTFxazii8Hgc27QivkiDFodffHk cTGsNBc/SHZcBNyPZ3Wvw4uhaKTusc5FbH6Y2JuUB8VwnR7/lOC/CDEFpVoX 7xfDPsn+59fvLoJZlj1wYeOzBtMv+aIW4dXtjjuxD4vhk936h68pi/CflfSN yYhiuOLPUnDy9SKcTbiVJB1bDCrRAmWzXxahHX9iz96UYhh/J1MTU7EI+5Yf neXPLoa3tXtb1JoXQaskWaPjYzFc7N+Pb+1ZhPSshFjX0mKQ2zzae3lwEfxk vA7WNxXDH2H7Qfa5RWhQW+3bphZDppb75PvNRQhnQUusM8XgbOW3eJRtCZqd YgYG6EtA/HLIxqjgEnC9fznxWLQEKP89ZngkuwT3ekbV/u0rgZSXKRwK6ksg L56dd/BECdj9eM1ftx+bzyVlbupZAvzUr+IXji7B4NhyA+9/JRCLa1V56bYE BP83jfP1JVCqL/nNyncJrPhC2hmnS2DYxQ+2gpdgMep3lrRgKRz4JGDn+GwJ yuqiJt0vl4IH8dJvpjdLcNdbMD0stRQSNou9CgqWoK8q5HF6E1YXH3e+y92x BLGvXbveqZeB4LXPrOW0JeAtvSeZcLEMIJUuwWtiCRbkvydcyCiDlNGct7VM y+Dd8UrrPV85mD6c6Qw6sAza1MkyBf4K8M2Fs0rHl+EZ3q292KEC0rqfDhMd luG5E1Qxv6iAeWm9dY3ry7C61bZTof4DMitC5UbfLwMP3PsydqkS1v7y3rIV /gsF7kPdmbFVsFvSfWdn918Y7F4dMPxRBVaHix5/0vwLlyc5zgRPV8GbhNOZ bJZ/IfziTPmARTXYarxsrHz4F57wbD1vFayBT15a4qoLf4Ff70jOlR+14E6z +8nYtgKm/kLh/KcagSN94Oo16gosaxM4JWMaoeCs767+0RVoXixVRY2NwNgb EVRGvwpdr6+lVx5oghxKmfY1/VU4vqN2WFahGUZ7ZN7/frUKm8Y9f/L+tkBs 8icHi6+rsKg+1Kqj0Qp69vuZy36sQrlR1WqcVytEEE+5J1NWIeGvseWX3lZQ JjzaZcGzBhT94lXJija43DUdXxq0BmHxRVw6/h3AHx8EShFrcP1Q7iTrmw4o O8kym5S0Bkqil3z9qFi92yl9wv/LGkyO6NRPok7Ia7dlVhpZgxUuJWcR5i6w i+kvTFpcgyHvL9UvJLtgy+KKOwPdOtiz2Mz263aBZdt/P3+Jr8NhYUfOp5e6 YLalJCjJeh0obC7tQdVYfRtlpszgsg55/ikl+eQuMDLHk/x81mGipmc1daYL 4pqntE88Wofv6So//USxerNJapa+Yh3kgqLVRS93AyXiY4Zf8zpkTVEP59zt hvtHDU78Iq2DQ3ccT098N3Q12LwvWViHRRY5epnv3XCtPtzdT2kDVrNe4A5u dYPU8BGWFe0NaPwhfKCIEw+tDOy5IWgDjGeFH/Zg9agCill4fGYDurwCfHAG eKCWJd/PebIBz87mc9v54uER1VFeNXUDbuksedAH40F7TawpP2cD7GDysW0E HmJ0M3l//tgAF6shht+ZeDD++jaTOrcB5QHFYtHNWL3Y4WXitrUBz58PThwn 4CF9RmV0lG0TDsqpDL7rw8NflS97l2U3YV3uw7bJLB5eHb/WfUd9EyY/pTy5 t4KHk17at+gPbEJCEU7E6R8ePrwpruCx24TT7cRjs1wEcKgLckt22wTFtA9P 3wgQgHHoANOuq5tAOSkjuSlGgK/0/969CtqEjJbF9llpApyTqTqx59EmyD4h xtxXIAAHhM19SdgEvXV/y68qBCg+dzhRL2sTGPZ4M4VqEOBiCIv+j4+bYL3b Jn9CmwB86U29piWb4Jifd2ZJnwCVpVGhLXWb4Jc3xZ5+gAA+FAs5m+5NUMdf 6vljRADRVZ4G8q9NCJV0INUZE6BeqNvbZXITtN707D16mADXdRK5R1Y2oYiO xOh1hADSp+zzfRi3wENbIkLpGAHaronYL/JuwXVp3Zn/jhMgKJ66FrhrC1Lu B15/aE4AxS/pGTvKW9Dot3pG5gQBCO3n0CPdLbD3D5pxxvD9aelhLpMtuMB6 464hhvdyDkYkWm3B/d9bbt+x73v35KiKO22B1vWWvwRs/YhjHp3Znltw0VIm OwHbX8dT+YbSzS14im9uWcT4Dfw3Kfz5PrZ/Is/YMsY/NievTCdmCwwM3115 bkKAA7W+LuXPt+DwZj71DxBgfGAfg8nbLXDPfVvQepAAyXRLb5oKtiDVwjzs rCEBTKS/HT/5cwvSLV9RY3QJMHcoYKandQt4D4+d9NAkwPHgTZ2h4S1Q3G4U ZFcmwMrzHxTvhS1Qn3X8SpQjwOuSeyHz21tQ9ieL6ZgkAbb/MtZtC2/D/U/V Bcp8BMgVbPAM370NZanDkc84COCoHcnJuW8b8PqauHxGAuT7c50SPb4N58Mz vMeW8dCWJhD0yQEbd1Wbd5zGw2ideJbJxW0YUuhX9BrCg7jYnqkr97bhL5ei 1pUuPIRXmz2s/rYN70bateTf4iFzyuKDQ+02SG2JBRamYf2AkF3nVNc2JBWV oulYPMx4u0sIT2/DRqNqg+ttPDjw3yu8LPcPVmwaxm4Z48H/4CPqjsY/COkV cg3UxkOUR8xO0qF/UKIw16ahgIefZeknfp7+Bxe+7CqsxfpN5QslQwJx/4DJ L432sbkbNgoXBH5s/gOTqaRPs8bdIPh7zdCWfQdu6VVIMO7rBnU2Orcx4R0Y LI/WGZPshgvOPHl8Wjuw57zNc4X1LmhjUj3s4bUDHoVPND9/6oJM+4s3eXt2 oNTxo0osrgteBvtM7nOkQ6yfV50Sk9thXxX7WsQ5OqQm6Zic4tcOVUzvmfsv 0KHX0sqqn49j9XrMsEyMPx3aLa4fpvivDaSyzzlOPKZDHkcuVMR5tUFa3cm6 lxV0SKI0Qpxk1goq7LPdazV06OFo1pcHcq1Qahndf7KZDjHMtoj477QAhdS0 sd1Dh+6W8R6TKWsB4QljzbNzdKjyoSS7mHYLJHDrZPLL0aOJ+h8/P+o2g5wt /qO3Mj3Sk7eT/SHSDPkp/qVV6vToWtLTPMONJuiS/kT0PUCP+ovE9t+tagIe LUXOVjt6ZBd0kNXHtgkyb9eJyjnRo9gIwWZ+gybYW+6uGHSeHuE/RX7Xk2oC i8NZxkq+9Eiz3PXXxlQjRDmIBj6MoEdzbAez3mPvoXj69/96Y+gRy65LRz0C GuFDv12iZhI9OltQnP35fCM0eT393J9Nj0xuFvSP6DfC6U8aFXrv6BHumsUo eXcjjC20N8d8wvhI1fWfxTUCSzDHyIEyenTmmvV1sakGSPn5fjGhih7VrUXh HakNoMB0lG6ygR5ZOjYUqjU1wOGYhxKpBHr0ZI8we9a7BiB2y+6Zo9KjydmN MaPUBrggXKV35A898o12lbzzuAHCsrZslqfpEc2B3N9wtQGs95VcU12iR1HM dCzi5xtAqvrGU/d1epSu3+jGYt8A0zYa+c936JFwuU1r9PEGKBuc7OpiZkBd bS+FPhs1QOSNt/OsXAwoty+GyUenARyY3HHAz4AMJEts6lQaYFGBevKTFAPS KcXqMrEGrO9M8huWZ0ChdxxZHvA1QOxR6zgJVQYkM1WlasvRAM4Uzi+2mgxI zzHpbQ1jA6h4N3Y81mdA0aPfpvHb9bC2HjZbdYgB7fz86vVwrR4aoox41kwZ 0Ne1oiDiUj0kSWzs1TBnQLFWKTca5urBPe+bpYc1A9r1uTXzzHQ97Dt07eoL BwYk+NDPIHaiHv61q8UQnRnQZQK6fnGsHtpcxvM4LzCgs/JvrveN1EPa3Os2 E28GtKT80W5luB687rtOB/kxoPuGPMoFGNbjk+DKv8WAbBP3L/Bi85lekVTH g7F43Ww/8I7WA14r4YR0GAP6Hq5tlI+tn11r6eMQyYDKdUITlrH9fe3Yn8TE Yt9bZtylYvwOjtTl1iUxIIYbza2u8/XAcft+y2YaA3q7JGEUsVwPFJaDk1ov GRDtcmzUyXWsf322yn75HQP6o8ThXPKvHm4qF+55+QnT59R122qmBjAu9T1O KWRAiPKF4TJnA/CYq3jzljEgdfrKlXz+BujrHYk8UsWAMvuLP6WKN0Cuz8v3 dxsY0PLF0XTJ3Q0QuOXcVNTGgCiGnSpIrQGOxIiOT+GxfFseLt3RbQBBKSLr bioDei15M90JNcBXOHH06QgDyrNauj3i0AChXSyeTVMMKIrKMcx3oQEsztc8 2llgQHdmE6LJfg0wHmbYcPUfFi/rJLPqkwaQaVAyMxdhREf45zLImL9nHYYu PpBkRHZllzQLMf9XjGWGl+xmRGEMPePS2Pk4zS5cp7iPEW39rth4x9sI8RZM pozHMfxGXvekayO4/Prpvv8kI9LSTvsSf7MR1HyDw67ZM6KWIIbu01HY+Yxb rO4/j61XmC8TUNwIdIQ/qOIOI5Ib6K6uEmmC8InKl3ceMCL5zaYsA+0mYKd7 wWAYyYhc7zbMwckm4N97pu5bMiM6cFWIfTmyCRQiuo9++cqI9O/w9uYzNIP5 gRqrV6OMqKqd08mduwU6bLK/uM0wop+mQ6cL97XAKa9QnPQyI+a33XxX7FrA OXk/Pp2eCZXpyr5mf9ECvnMF9sm7mBCo/gt6q9UKia9fO0faMiEdnnmtX1fa QLTswY8jZ5iQAi6sxia5DTK6XKWY3ZiQ6zte050fbfB2W+LPg6tMKCROvH2N tx1KHJMuBEcyocTK9au839uhj/O/y76VTEhvK+0Sjq0TFG96BNqpMCOn1Ede NaQu2Lu//1TWPmYk+cymXWGyC3ToTmtM6jGjJMpxwYDtLjCJPj56zxQbb+eK +L27G1xy1Ow+OjOjjM0AhWy/bkghLmowxDEjcqLO7Cw9Hl6k+XBaJjOjA/6p Z98K4CHHbXj0WToz0qqR+mqIvX8F0z0v9r5nRscSq1fnjuKhg6mU80w1Mzpv 69cT+gQPzLr3xr4sMSMZLvTnJPbec22u1mysM6OUW+OGNlg9yF/tn2lGx4Lk G0qeSmP1hIyluz2NiwVdMZtkkjEjwMFLZrUsiizI5b9it7QQApiqVmbaqLGg kF+ElZnHBDBf0LuTocWCnpcpRrE9I8Dpu8qaWsCCytw71uO+EuBmMmfWudMs 6Mu/SE3SHwIEO4Xfee/CggxOKjeenCZAmOy2/dJFFnSiyuT6k1UCxH+a5Xp8 jQVJXfkyfYSbCHn13XeKolgQV63x9ypdIhQ+MXfYiWdBWRIL4oeACGU2tZrm z1hQpNpbSsAxIjT9Khrvf82CcrKL+hTPEmH47zMHzh8s6JTL48fn7xDhlbH2 jV+1LEh6rHjDPYwIrjEdcV9aWBBz1icLwSgi9MozN5+isKC/X7Vu/pdKhFT/ 7BGFfhbE+fRl6+EsIjhUHGBYG2FBaxJprIVviNB96vqBjCUWNK00EJKeT4TY LO7Tvhss6Ps7Wz+hYiJYTL2/iehZkf3zhJJDFUTg0D/8lJ+NFQWZ3DoiWI3x Dev/NMzDihKtCrmf1xPhUcedlu9CrMhGY4y9rZkIpuLCY5G7WNHnyceHPrUT gc4jn9FpNytSd5zLP9hNhMp8C5m9KqyI2GAccIdIhJDtsYM7+1hRvOzdHA8y EQyPPzzTrc+Kiv28Hel7ibCSJHX7tRErutGTVGTeR4SiP6UJt8xYUceOxZjJ byJcV7P/ctSCFSGmVNnJfiJoBM63ip1iRVmFahlogAjTtU/Gp86wIo/zl1OO DBIhl1eJudKNFR2RsXbYwrCXU41svCcrWrl5Q9l9iAgK784ZufuyosD7K66B GB5cXDurc4sVVb+66wAYzjZKCmAJYUV0z+SvFGPfu0RpJFHCWFElxw3WAWy/ XaSWr7mPWdHcV+vkij9YfmQ92kPiWdFZ/FqkOcbv2VX6SatnrCjFecbpyS8i 2JVmsMhmsqJl/4mYezQi8DMb7F7KYUVVNwk5SlQidFljPcdHVnQs57NaOAnL V4av87MCVsStEl2cTMDyNc4e5F3KiirKg385dxGBXedN8oEqVuRYGXywt40I 4a20jv52jP+Xmf0bdUQwEQmYyieyIr9sf+3MKiLsuPOzhdNY0TtxRpHNciLc 2ThmrDzBij7IhccNYv4wODJ8bmOOFTVdMsv1zSPC36f37rStsCKmg8nl398S wX/P90J/JjbErm/DFppGBPVbNl0mnGxodnNq6V8iEaaqpqcF+dlQ+OoxPYgh gsfp3Yql0myIsWXCgf4eEc5FxKfSH2BDZsyjhm9diSBOUP1GMGZD3JZGkwcc iUCRaux+c4wNlboVpqVaYXp93+Ywd2BDlW8NFD4eJIL5yOW7CdfYkCiaG7YV JsKRu7vzDgeyIUrjHglfLixeob7elVA21PHNov4sAxH2m1kaOEWzIVL8ZXLe DAFU3mgs7X7Hhs4qK584VUMAzkvLXt/62NBDHx2RTxex/m34rh3lKDuK30sR k07BQ1OI3sMoK3Ykv7vU8VskHuoEMV/bs6Owz42Sh7H+uuKwG+9Ld3bEGHjf y9oND3k5Ji3ed9mR8d6ry0dVsH77IivaLGBH+8U0qF2V3WA1HK8qJcWBmqQt ltcXsfpddZjoLM+BUub3q9LGuuDEDf3QdBUOlN1bUEju64JjDL+7RPU50IET 3nqKjdj9LKN6W8CaA8mJVY3se9EFVZ6h0rYOHKjSsiWdKbEL4Et3U7wzB5Ku P+K8EdkFB40CJXi8OVBjWrDiyVtdoOtcX8UWxoH674pcLDzZBUWvRS8fjeRA bIz8zJ+OdIHWlI/Ao1gOFM4pUtJxqAvU7/B7MKZzIML9dckYtS5QTnXl/FeI rSdTWMzG1QVv+wuKDpZxoCRWr3Z7pi5QUGJxCa7iQFEEI4/s9U6Q+573da2N Axma6aRl9nXCLuK6/dIIB0odrBXkftcJaRKWO5rTHMjWn8KTkdYJYhey3/sv cqAc3Rqv2NhOEF48sjnzD9vv3zfcy4BOSDJMy1Fj5kSp5fv1aq90gsCDGUsf Tk6kI+t/2cK9E3C4pOxxEU6kQpk/88yqE2Idx44rSXGiaVffL2fNOoE7a//S JXlORAmaOhp5sBM41AfMhvZxooyjvjIKap0QeUtnTlafEx15wlyRLN8JLD8i Ut0OcaKjUZ9tbkh2AqOF+tSv45zopvp6SwCuE8ISHyTtsuZEuPMhLVkcnUBH Ix5ycuBELzmaNvWYOyFUTnnsuTMnmpnPpxyi64Qt7+B4ijsnMpvdxBdtdsCd /A5DEW9OZN9w0i5jtQPW12SH7P04UU7sgcrlpQ4IRLeik25xopJc9cuV8x2w EtGkSwjmRE1OAR/WZzrgZqdEP18YJxIcRvVvpzpgSdgv0jqSE507lPCvfqID rrvUaMbFcqLv7paxjuMdMP9GiNaexIm092q8cRrrAN8Zr3CudIxPbacPfrQD ZnQq9p54yYnC014zVGD4Sggv+fE7TuTLuf1AFJs/Wet+v+kTJ1q4zbMxhmHp p5TLsUWc6MvZ3QwnsP3sXKzs7co50fs8vK0uxuexah2I13Aig+O3/7zF+Fau Gar8acK+jzJKysLiWar/Ivi2kxNxThlaSC93gHKiwo4PiRM9e3yOprDWAefc 0ic0f2HxZMSyF251QMJePuLqECeSqs1LbKDvhMaNR5U/JjmxSvWFqhsrpm/j 1vuHC5wogs8x8B53J2gmX088vsaJxubnhOQFO8HDffwu7w4n+qqam2wp0Qnp Gi5ePcxcaMKFMXRTrhO6tgi26VxcyJC7znyvaiccePZTSUmcC90eCDghfqgT /C/q8s9gxcqNHxwmxCOd8Fbz41aBEhcaf+b9itcG819bSreRLhea1HctZPXs BLPnXBVMB7mQ0+sGQs31TrjjEfa2xYQLaa81HNoK7YRhOt9gB2su5MtzzXU0 FfN/x9ClXY5caHSnRy/5bSdYpZ+xHjzHhfZIhDyrLOqEEl0zBV8fLtTMcqM5 BN8J0Zd3df73iAstXy+h1rJ3QbV+QumJGC7EEXdo9hZ/F6wwseXwJXGhI48+ vHaT6AK3rKXAFy+50AsfNfNfe7H6j9gi962CC4nZbLO62XfBr0NBt4cXuVB0 bvi+wU9dwM8555a7zoUeSbCfaSjF7iPKxRP+dNyoxG+wjFTfBQXXrWW2uLlR g1leYuDvLnj0TqlFYA83In2f7HjL1w3qfCRJU1dupBe4s9ET2g2jMaNhyZe4 0cMwhd+i0d3wgmN1bMyHG6Vr/Kq5+bwbuJhEC6IDuZFDPrfizaJumFw5c4T0 lBv9cuuTDprqhjd9v3y967gRLYSnleSMh13vR37G7eFBAmNyvClHCECUX5Ef 1OBBV95dPmtsT4AnL1midPR4UD2VlWPiAgE20pTsqCY8CD+Qz6TygACUGO9x OWce1OV2J+1MOQESb8zgvsfyoGTpgH15e7F6CP6e71viQdYq8y1WTD0QaKzM 9n2DB6WrC6bN8vXAqKnT5zh6XvTvlU+2j3QP1Byr3jDh5UUnZ39S1w174I5t TOIHFV6kqXLo9smrPTBuV2X4UJMX/bImuFQH9YCD41K/swEvMlEOnWR/1ANa zmfUcEd4kXL0p3GJzB6YuqRQf/s8L5rSs7DWaOuBs16nfay9eJEbixeLCbkH mi4/4VPx40Viz3LqFAZ7IMdv4dyvEF6UuzJOO7faA85BP1ZMU3lRU96zrXvS JGgJns+QzOJFsa+anDn2kMAgdLfp6hteNI07f+i8FgkEHz6Oyy3kRQeH9BOu HyZBW7S9Ml8nL1La/4ZPxIME++MiOyZ7eJHoB86+taskeP+0/GZdHy+6vmXY 8PoWCcJTZKsDJnnRYdvLOafCSbCYaudps8CL3Mfb1h2fkMAtPYJbdY0XfRqv 0pRPIIFU14raHAMOeYxRjAWySGBvg6NzZsEhSYsHr3TfkCAav4fQxI5D6WNN K1IfSbBBdA56hcOh6aXr1WbfSaDpcNuCVxCHBl+0j4WVk8CLHCcdIoJDLxJK zz+qIgGJWlNvL4VD60PPR/ubScDt1JdaI4tDCb6CzbodJDjc99dHQwGH9o6r fLbBkyD4HC9kKOOQXtlqjDaJBAW/lfnZ1XDoNVvYJRqVBBOuJiO3NHAoy71c 7/gvEsgMOJUMauHQP/a7bHf/kCB2KNalwhCHEpOuDeiNkqD+4nvNPYdwCG/y k+fHOAm2RqqZUhAOCUXVRLJPkUDbk0ZmOIxDF4VyfHfNkODy+HKu31EcyvF0 Gv47S4KX3jyhfeY4dNn6A3/KPAkok0o2x61waPcWn9L2AglwV4zlv9vgEFc2 6ZTqEgmOzpxdlbPHocWa2U6ZZRJkCj4k3DuNQ0U3foz2Ynj5wMcvfU6Yvr9I HS5/SWB+gfDE0BWL78bp5jwMZ0dteqa449C9YzkS9Rheyd99eOkSDoH2Gd73 GLaknpCx9sYhylvzRXsM59Dd3Mq7gumnHSjcia2/oZRBYffHoW+FTHgBDFuf rCvyuIFD59T23pPH+L29PR1fexuHTttDCP0ipscLwasyd3BogRSn+hGL71T9 weN37+KQkZ7/kuwcCXKnLyr03seh+hvyRh6YPnSCMfT64Tj015kSFIjp53Dg 26/ECBxKepokemaCBHnuv0rno3BIyUg7nm2MBAxRzCmWsTjkFG13NmKYBKfz 917PfYrNb7Fd7hkgATNdqMrFVBxypPuQNUwjgbPSW5bqdBxyaJn48YaC5d+q Y1AyC4dORf+sN+ghgcsLqXTyGxxa5s7Ek9pJUFR3JEDnAw5dDblIN4T5i2Pa 99TTPBwKTpL2rq0nQfH+n5wnCnFofkH/POMPLF8U15DKKhy6JpFHfPqBBB47 Eacl6nBo9MuTjzY5JKhQ/KoT2IhDpdnM65OZJPC+RTej2YFDh3SF2vMSSVDD //LcGxoOnbhVVvsgmAQ3LQeNolcwv0gaHdllhp3vmxwSE+s4VK7+o6D9EObP DK1Vs20ceqmiyHBJjwTtk2Ffdhj50J0lnbxjSiRQjNwtc4OPD51mmdLdYsX8 VXOR/qwaH7ISnS2j1PfAvHGv+F0NPoRz+O/d0I8eYK0+qZOtxYfuXQsTGv7W A3o/93uOGvAh+TszPk1veiCpHNd+3YwP1XRbdGj/1wMniypSn7jwocspGnsO mvaAh7ZWwefzfAjrKs+u7e+B0IJ3rd0Xsf148+a/afVA3teEfyI+fKiZsne/ gVwPcHzyupgTwIcmBVRrrtL3QMMbwX0/4vnQ1g7SN8L609/yUcf/JPKhi2/k Uz1LsX7l9Y474zM+ZBL3vv0F1s/Iv5pMPv6CD+G1gvy0XxEhLLNqs+cDH7pp Km8rHE4Eo2dXGmdr+NA3Wu/vEyew/ll48A9fAx9yMb114OlhIlxNdtzQaeZD IQpfX80cIkJGosne4E4+RCo9OjizjwgbcaKJrH186IaB+ZyEKNbP8cbmqfTz ofd85wP28BNhTyxjg+UgH1o9Vx9gi/Unp6Nn1xLH+RBFYXxujY4I3yLrXGT+ 8qGSO1Ov30wR4L15q2jEGh86+Ge4RXOUAGlcePzMJh+qahMhD/4hwP34/iPl DPzoLEd83zcSAW7YjtLJsfAj/OrSFKWbAB6CM2WR7PzIc7uMa3c7ASxSN9Qd cPzoCKd0pHodAeAs/USFAD96tz+7b/4nAbR2sb3eLcKPbHMP6PVh759ItpDI giQ/YucIqNMoIgCH+65uR1l+dPj8557UrwTY2r37SaU8tr+OzBu1TwQYfLdv 54kqPyoa+4+H9JYAPd76pYvq/Ih8iuYx/ZoATapGN85o8SMBd7kN9ZcEKJs5 vLdKlx8Nt01IZmYS4NOXE2OKhvzIwqpv9/4MAmRfs30Zc5AfLXeXn2FMI0CC 9hmnZeBHZ7ad2TeeEeC/v65CTqb8iIfndaBUCgECiz06q4/wIx+ekAn/JAL4 BF19rGzOj767/Xq+kEAAlwM3TeMs+dFIdlVt9lMCWG/f2f5rjcX3S+ZFaDwB TH8+KHa240cR8muOT+IIoPcg8lqtI7a+7yG5xlgCKJvGqao48aNTxEEFLQxL MKeMxLvwo5Q9xMi2GALwNGZkrZ7nR50Df6+kYJj+8eszLpf40e1T8vNxGF42 zxWo9+JH3VbaaqUYHuXKb1e9wo+ec87q8WPrUTuKIxL8sO+viMilY7gtvtJ4 /To/ikm7vHkK41NpW7/pepsfZSyktx3E+OYLtn1rCOJHicfOpttj8eSQ8H57 7/KjvVHW3plYvM9SqXuS7vOj2BwlHRFMj6izf4Y2HvIj+fbIvz+TCRCya+zF +Qh+VCsq8zoV09Pv94xjUxQ/yvbMUn/5nADu2ct8GrH8qDin+j9qOgHs3Ddb k5/yI/XTVgnGWL72j7KhC6n86D+mXa7ZWH73vufdaE7H/Fd/sj8Fy7/MZeGi fVn8yGW+L6niAwGYZ3cr/3uD7Uc8/jcJ88/aF5XBix/4kamLgfFRzF+T1zQz WvOw8a4PTMolBOj6a4R7XsiPlD3iOW5WEaC22Kxl5zuWP4vZzt+Yf78HWYR7 lGF+mf3MH9BMgPTtM2va1fzIcm/pjDoB8z/zrT8dHfwoR9/cqHCcAOLSzeTN bn7EPUO9IDlLgA4DyU7lHn4UdvnmVN4Slu8r9T/CaFg+/3Pv3b9DABaCULre ODZ/JfQHG3aey6a9Ey5MYfNvrD9JkiKCL0vl4/hZfnTLV3vORIEIJEOPwMll zE/2X/uZtYnwJvu7fSa9AGIsTeoTtcbOexmHZSuTAIqWu9DzyZEIXESXw2us AmjPg2907q5EuMnKqm3LI4BERx2EFP2IcNjXEcciIYAIHAw9vPFEGD6w1nJV RwB5tfvFrZGIkGpvUZOmL4C6nwVbmv0hgoVfdmnjfgE0Mn2E6cMEEYpeHXsv ayyAMg0fCRVuESGc/fl/PZYCqCN3V1z17h6QJxuiQ54CyFAm3NLkVg9cuB78 jStNAP1M+C0VKEsCPa3f3/a8EED2f7QA1LD3bBF9P5ItgLrePLdn1yfB12ss xfffCqB3s91Lry2w99v/aclygQAaYHk/MRBAghS/d+V9rQIoxzHRfh17H5uv EKrztgWQJJVNJfAmGTLU9Gqa6QTRi+rWxIBQMvhPp9aMMgqiwf0BtzwjySB8 xaVWhkMQOSquxAtnkMHdZ6IuSVgQ4X7Ps+fUkLH+eacxREMQhQptbfJyUaBz j3vTcy1BZBmbJ90nSIFXE3VN33UFUWGP/t6nkhQ47h3VPH9AEFEKRc8VqVMg xUuo9eIxQeQXz0YjnKSAhqdqh8V5QaQxJcAiH0OB397Sfp8uCqJxp++PppIo EH1FAMfjJYj+jonxPs2gwMS1TZtOX0G0vc718+ZHCrwOae2xCRFEOeOS20mN FLC99/N2wT1BFCB4m820gwJ0YYUiAg8F0Z8I+uA2IgXORaSfIT4WRB0dr+77 D1BAJMHnl8MzQfRPUW3vyhoFGpJcQ4vTBJF+mHZw4D8K3Hx2Slo0UxA9vZ16 hshIhe6MA+epOYJoXu+RmCgPFe5naTDsfy+IlLCnc4efCuqvdr9O+yiIruDL NatEqPDkHeeIUwHGl+VqeqsMFfbn7vxX8U0Q7fLnPyGsQIXxvCVFyVJBNBfn FG64hwpmBTSv3z8FUYznqBW7JhWWizrZoVYQjS6P1n/TocKr4trcrAZBVPuJ NWG/ARV2Kj5Ou7ULIrEjxmLtRlT4/DMrprpLELka2xF7jangXJOoLkcURLvN AoerDlOBoz6iM4wsiNzedtncO0qF0sZg/6FeQcR24qeSsDkVvFr8+A7/FkTW uMGb/1lQQbj9QkHOgCAyneU90W5FhRv4E8uXxgWRiuvSxKgtFbASIblhCuPD 5jhaYkeFLrK2ntIctt91ccIFByqE9iqRIxYFkYHyv+4xRyrs/SUROP5XEP0w HWE1O0OFvn5esePrgqimrisj+CwVogYZyz5sCaKNz73lT5yoYDCyepaDTgjZ je1LvOVMhbGxqc3LjBgm8NoZnqNCymR/RiuLEOorq9AiY/jwDOGQGocQGp2+ 53HShQqLc42/o7mx8XeZe15h+OVi+b0ZnBDiabAr7cSw9d8vMlaCQkhEo8Oe guF/q6+rP4sIoVweGZMKDOdtPHPnlRBCL7qN64Ix7LT9hNFfSghVTDAriGCY g+5+TpesELI4w/81Ftu/hOGmmaaCECpnoRYOYnw9mL1GnyoLIR9q3AMBDAux OUcsqmLzs5WvymLx1XFYK5/SEEJMtcfaubD4r3Mfbi7UEkI3K9Fmz2kqyOAM LgvqCSHvq4yn7mL6dfKrcd4yFEJWUpLajJi+RlevTqQfFELcL9WDwzH9Pzd+ bqwBIdRa9NB0AstPbIhmOO6IEFp5wfLK5SQWH+m6u/5xIdTjfW7Iz5IKVzWL kIuFEGrLPbB56QQVLEb1tj/aCiHTwg+iDJg/KlAgDW8vhFI0X5LfY/5RSy8t XT8thGSy//TrmlCB0/rg7aOuQqj9RJQN0yEqtJQazw36CKGth0kldzH/7hd8 2M7uh/EJWyk6r06FXN+6j/uuC6EEISZ1DVUqPN591Cs0UAiJ9q+diJSnwrEY iwGx/4RQlUlgMAhTod7NkWCdKYTwbCVkpRUK6JSn5ge8FEJnpU9FURcokCPU G5eZI4R4tRIkQ2YoEN7ibDGdK4ReF9cNJg9TwETHvT6iWAgRZWu29uApUMV6 tbiySwglUl8aHsXuj/LPYelqjMJIzuwnJ8MZCrBY2Is/YxFGA0Vy/W6nKGAz ofScnkMYCSdJvqi2pMDY7vYUEk4YHbg8EfbEhAICz0US7ksJo6L8L0Gn1Cjg 8zAvkmgojLj1ltLM6CnwXeYeKxwSRlY29EF8W2Sgr7R59AEJI5fmJ1ETK2R4 trbyMPSoMMqo7SysmiZD7VXje8r2wujR0KMqCSoZJE6TboX4C6Npi4xUpm9k 8Pj7fnn0hjDyMRoXoX4lQ35C8A2bAIyPzJXKmjwyHG2XuaYYKozeCgXfJeeQ 4YaJz5WuJ8IopvuntmAKGSr7D03tjxNGC2mjl7MSyMB+F3f5TYIwqtEYfWwa R4as4m+ed54LI/PNDR0K9h60qtFdkH8njB4+Lf1qdBd7H1rwA7G5wogatf4u 4w4Zznu+cVv/JIxuGB4tFA4kw+pLc5eOImFU0NVwxe0GGUxA8pdBiTAaJPU3 7rtGhpi+OafX5dj4XFO8lB8ZdosknwmsEUZnH0y/P+VDBt8iT8pgvTB6xzkR l+5NhlKb/Y6Wzdj6bRqCDF5kYJrjIhW3CaPder/uRHiQ4WR0v51clzBqiLBm UbtEhrQ9BYRoAqbXK6WVuQtkGGkIt10lCSMW6QMRBHcy7Lvo2H2+VxhdT0tb Ip0nQzC9inXbL2EUefzx9Q03Mowe5qQoDgijbtvOc8YYto6cdn0wjMWrrpD0 zpUMZa3tY7QxYWQMI8Z7MSzP+8VPbwrTf7Y+Hu9Chljb+NX4WWH0Mof87hmG 15Kv3ZtaEEYCa2EfQzDsTrVlPfJXGO3ji/jxAMNtu3TisteEEeX42tZbDOu5 CYlsbgqjBEZ4NI3h7NcrmfY7wmj9m/ANW2w/jjGy4lcGEaSrG9NLwfAtldLP HCwi6MY+hu57GN8/V9P0LrGLoMPjil5HsfjM84Mrf3KJoIZd/z5rYPEXLTsf EceJoFTtvnwDTB8pA6OOmwIiyC7Z8477RTJEBks7dAqLoEiT57yfMD0XK+l+ 7xEXQStZP26JepLBmWHwUrikCPobdOtzDpaPRrPamd8yIqjRqLjE5jIZtB7n 3DKUF0FJfl3x0leweqPtv+1EJRFEd8xzH48vVm+cOsZ9XF0EHZi6mmV5nQy9 KXuSX2uKoNMfV+0ysfrkcC+H5D8dESTVoJ/JG0AGsfPtaoUHRJCph3n6qRAy hOd8LuIGERR2/oyM4j0yzI7FHfQyEUHtfJk00TAy1PjaWkgeF0HKeUzBLph/ 1Qq0iQEWIuiV17RE/hMypPwVdMafFEH7I19c2Y353SeE7BPhIIJs/9oHe2Dn QzDK+cnCBRFEPXfA4fxbMoS2HxKw8BRB1XN74vJyyTCOk05/e1kE/cgPXhb6 QoYfzwZyna5h6/86bW9Sgp3PNx4t9aEiKMfPxXOjlQxd40dtZcJEELf/Kc59 3WTYr7an985/IuiLrETtAxIZeAunJjSiRZBatqVB4AAZSqr82dOei6BRszsW 79ewfPfdOeZbJIICgmwPNapSQC/gA3dcsQgaVFyvlNaiwHl+Cv5LmQhaTsCV PjGgQMkx3XMLVSLI6NXj8gwzCnh8m7t2sx2L58ixA8/dKFAdezH9zqgIegeF ubnPKRBobDX7SFQUhWkdl7gpRIWcvpDCdxKiqCDOcPu+JPbeBHwMbJISRVWB BfVJWL2i+JmNkUNBFL1i9rTu1KUCQbxWJEZTFDWEZqqGY++R+rK+caK5KKru UXr8JJUKI29lk7JCRFG+vtk6265emA4fWGe8L4ouktGDFvleWHR/6er1UBSd a6HQh+/tBTppWVXNKFHkXDb9u8+oF8SfydTUPBNFJi69/SLne8E6Qnp+pEAU mTOw3jR73QuOl/rtzb+LIm7JAI0TH3vBxTSr/HOpKCJfSdQyLuwFnx2piIAq USRN1D61VdMLjwKkpNg7RNGs5CGN1wO9UOEpaaE2IYpcshOunJWgQa3Zr/z4 aez7SP9/2nI0aNn9QuTvnCji6FHPW1WmAbl/19CPFWx+RwTfQT0aLDruunOS SQy1bopc+3qSBuu6ff2FrGJI5/ELY7w9DegEM8xEOcVQTup8J82JBtxdEnwD fGIoKopT+o0nDZSPSby/Li2Gdm6VdLGH0kBDkcZNlhNDTBccWtwf0kCPKf3G AUUxFH5M+NPLSBqYVokD015svvM+364EGrgYiJOS94shz9fuMjNvaHBJuPfA xiExVHUUn+SfS4Mry89fuhiLofLJ+M+UzzQI+ip2VemYGMIbKjo7FNMgSVmM qdReDK23yk0yNdLA2UXx3dBpMWTH+TH8agsN5JO0zXmcxdDF/vT8H+00KNqx jL/gLoaSAxWzBIk0CNF10o69JIbI3H62EmQaHPbxIpV4iaFR4bt32XtpQCSF 7eLxE0N8BUPaGf00yOCK/2lwXQzF0qlWoUEaXDR54X7hFsb3pkBD2zANlj8V vy8JFkNHbKTs0idoUDFUd2IoFOO3bjv1a4oG4WL4We4wMfT5vrk42ywNBP6b 1rkQKYaO/hvxF1ikQW/ZOjnmiRjaNEj8trxEg1fzLMElsRh/Qf62H39pcFlR UGroqRgqpuo2+q7SQMtZtpo7WQxt4yLKWddpsPFU/aJBqhgq0TL+GblBg5rG A6wX0sWQ/AHryYVNGthqO1iWvBRDCfL3pe7+o4G494X5wRwxRBUjumbt0GAw 0z+R+z3G5+Yvg1y6Psgl3tUz+CiGDlnhm1/Q98F1jidU989iqPB4pM4dhj7Y j1JDYvLFEJfDtQxg7AOG22+kS4rEUMaZVMVZDLd8LKgZLBZDuj9frP/H1AcJ Az8vcZeLIf7xwkOszH1wVqSdzaBSDDmFpe+6jmE5y96P7tVi6G1dVnUDhifD xqxi6rB4YhPOMLP0QUHJ8kJxoxia8WviV8fwnVn65MEWMRSRKChpjGETeV4D 7g4xZJtY98EIwxxnd9H0u8XQn30ZU4oYxsftCXUniqGOv13CG9j6afV6sjFk MeRTzny+BMPum6Z1xb1iiFX8CL07hlU0bTwHf2HjVfT7VjH+ix4uHNwDYohY yKoUiOGyDJ9P+sOYPwMfyI5g8YbhA63dx8TQvPyskxGGzdkeLUVPYv52khQM x/TiM0pMKZ4RQ3RaKo+/Y3pSbmQbDs6LoQH625s9mN7ZHz71cS2LoTy513mD WD68+svu6a9i+j6N6+/D8rVPqEnOfUMMbdw/SanbpsGaeU999Damb59SX9oW DaruD3oV04kjx0+Rmq5Yvq2ntz5zsYoj5dAz84VrNBCV47DV58DGly2nD2P+ +eMo8vc8tzialWtyqcf85V+reaBYQBwxhEtQkjE/xqd5NJ6XEUf/tG1z72L+ DbgddiNktzjK/37mcwbmbxfbTOlniuJoV2m1+ucxGqhxkALa1MSRzdyuPx+G aNAcZKasbyiOSEZDHVw0GjCckX/MZSuO3vr8cm/GzuuEDtJVshdH+qr/JejV 06AL5zxgfFocHTpfEZheQ4OspkTDABdxZLJM12L5gwYHDRgnBy5j/Bo9DroU 0OCWyKB58UNxZIRO6dxNx87/0vZK9yNxVCpF6opLxc5zp9jr6cfiaEKguTEr mQb8ETabsvHiyJVcplUaR4PPK1UfozPEUQkP6yYNu6/Ge7K43L+JIyai6fi+ KzTozC8vCSkRRzhZRpKpNw2+x5AvPisXR19PnGg444GdZzPeH23V4uinfDBv vBsNZL+FXtXvEEcKN5iJGtj9eTbpXAfXmDiipuqxRAANdhVySPhMYnzc63PL DtKgv7vYs3lGHAUOH9i1ZojdJ7z89I+WxVFYGnH9qQ4NfKMatHfoJZDEwic/ CxUs/x9u3D/HLIG6cyxsqUo0WGqUaS9nk0BJL+W4byjQIJA52COQVwJBzc87 HTI0CLuv8XxhlwQKDwhfUxfF9MjqGzkpI4Hc82S91IRpwFr5WOvzbglENjW4 YihIg+jNodbLKhJosjX51kMcDazEn4o275VAuKc4sWoeGvAZGl1S0pRAsotu MbzcNEi5nfpvSF8CzegaCf5hp8HpZLMTJgckkIVbbYk7Gw0kihafZRtJoBVn JttVFhr8xmcN/zOWQOzFdAqZzDTIXrDQPGcmgWwmhW85MtHAHbdxt/yYBLrz befhbkbs/tZ41yJmIYE4nzY//V+FdR4P1fvFAZxIm1ApMebO3DtIkUqoUM/J HlLZoii0yZItFEpFCi1UhBZFvpQsiRCRJZKUNfs1RooW2bfE7/n9+X7N9jzn fM65M29eO3rqwn/0iykDJqs/Pp6ea0Mu4emZKpYMyJ1IYYhjKz07+O+WNQMS SxKDds62ocH3Cw2HbPDnbbctC/rXhrK+50TvsWOAeAxnumWmDZ0WOtKTdoQB BTaWntrYW2TFNgqfYECe1Uxq6d82NK39JsDJiQFhH72aLbELHZyq3rsyoOyi EYcP+/xFiVVrPBjQ04cKi6bb0M5H5Q6XTzOg6NDWmlvYgsUeGT2+DHgTqxMY gF3RSczs9GfAvx1xU/7YV2eqDR6dZ4BP/C37SGwjxtmo2YsM0HqQ0laILaIu x7O5zACZfJ+QWexaqwalgqsMsDDICf7/eW75XvCXvIbvX791pBzbInr9e9+b DHCKHfy9C99ndU6b+JdbDODp9t7oxW5ruGKvEs2AUyVbBu7ietwfVkm/FYv7 pcqm7HG9Di/jTQ/eZ4DK5t87duJ6Uhtv6u95xIDjQgL7t/K1o68mmnfSEhmw YX27nx5/O/rPtZ+7JBnnZ1og3xn35+S16PVOzxgwas8mUnD/FFO1/d6nMWDp 9+/Zf3F/B6oGK+Re4PsWyIUcx3nI7Huw4nI2Aw7yFcX0LWhHXguM7HpyGVC9 6cnQRZynSZ2kqfgiXO9nSRemhfHzuiA+qLyEASfvWPTk4TzyKcct7S/H/ZvJ Dg3HeV3AukkqVzNAJ6sx0hXnOSwqNNXyEwMIPfm+AJx3EeFgVf86BjwQN3d+ hOdh1dSZXeXNDAgseF7HYbajODevhr42nHdS+GEQqx0xv7naLqUZsLop9eQE ifPY4OBh+ZUBP18/LpHC87c5zTi2b5ABM9Q1fxNlvB84+pylo3j+tAZMjVXb kXrczrRNEwyoWpodbru1HWldUSvx+8eAPaFlefk78H62Z/cLL5aGHL3CNgtj PO8rR7du4kiDdYZy65wT/n8WPlBqIScN7olxLTJueN/N6zf2WysN9QlGAge9 cD3+dNqVbZCG1KlGatq/HYVXVV610JSG15889Gavt6OUc/dazlrg9+c7Xx7M bkc9vVpnSq9Iw8F4z0W0MH5exn9KWBcuDc2NrroaK/Dzx+pAza0b0qBr0vwu UbIDHar2oI5EScMDvjWsKLkO1Jb56KNAojSE3TRpHwD8PPWfZesWScMZFaH3 a307UOmy11WVo9LwIV29SOB7ByKrdUc3TEqDPN3UsWSgA10IriNi/uL7rXva tnysA+2Y6PNynMcEfU7NV4ZAJ3rdIUEsEmPC/RYxW1FWJ8pK9vY0VGDCguC5 TDnLTpSwfROjxp4JexekX7hZ1IlKTRYH/T3KBF/H4QPm5Z2Id7jnx1pHJkRN 1TuLfOhEnEtRr0NOMeFO+fEd9k2d6EnFlDX4M8HgpLya/89OlLSnNOblHSaI KW3m7F1Jowq7e3y8u0zgztv4Z7cUjb55nHYUu8cEZ43gmO0sGsndkdvq+pgJ EXsm6obkafRfS1izXDoT2F8U9J9q0CjF3mxVXCUTho6G7tp8iEbvPRXPv//A hAoRy+uaDjTqC5r/bbyGCeHMOx6qx2kk/19ujlkjE84EJL8ac6XR0x8Mi6Xd TLh+Wi8vLYBGH/6OFmp8ZUL/LqGATRdo9EP4k4zTdybcTfTf8iSIRus2XBit +M2EeGUta8swGj3z+nr7wjQTfu4a7P8ZjT8f/OZv+j8m0Gqk4LdY/Pmo6COd fAR8Id8WfbpPI4U8g83qCwj4aTfB75JAo+czz+tHVhCgNpd0oek5jT4uDVGn JAiYuJ1koZNBo1/E4YS9UgS8T7v37vELGinuXOaZxiagXbs6XP4VjdIuey87 sZ6A3YUrrx8vwu/XtL10eSMBZTcv5+58i98/qjOSuJmAUx51HsKl+LwO4k3c bQRcSrD77P4On09yRndOkwDGKHVrcSWN1tb1vGICAd+WF3LuvMf1RS9jDugR 8GHB41mfalzP8bhFZ3cRkDeH3Gs/0mhN+iW/u8YEbFKw4pf6hPsjbWrTaErA 03xf+lwt7mfDtpphCwL4IxwPxtTRSDac3LHMmoB3Yo+tE+tp9GRqkGVymADF nG364Y00+prZEuHiQMCulHo3xyYacRzf8ocfIyCoj3VN7QuNHFgpnk8d8f3n axeMYSd8udlT6fz/1w8w/2umUfd1X/NvpwgYkbjYoN9CI7bu4XeCngTkD1XM tWHbzeipcbwJUK5Vfne4lUbxL5WSd54hwIN8o/8Fm3ZatdrOn4CwU7uf72ij EUHNXj1/noCzZrmrY7FtW3un7l/E338i92Uv9v2IGqeCYFx/ycEnMu006tDP aW+9QsBb72/iltiMufvGk2EEWPbPKvphH3gV/GbVDQJSf52ViMSOc3VRUo0k oDbJfS4Ou03GPN7sDgEJ/nViMdiSHRpinncJyLlnc+YqttVtzsWIOAJ2eD06 4oIdY7hkOP0BAfKMcT4d7Gb+EYeaRwQ8zj0XKIq9Kr+t4WciAW7VUqKf8Xkt 3Ut1FicTYBzozr2EHbXmWY78MwLCOztlFLAb6Ug5/TQCDs7zE3mP6yEeffbu sUwCZkGs1hrbbLf9wuCXBCzfIf2Ai+t5S3DX2YRXBByde/fUBru+YOOPt/kE 3BnqXPcJ92OZ1+qDXYUEpPe0WKhiR3R/15QuI+D3LcdLvbi/tTGf09QrcH2U JoeUsEX35hLWVQQ0aFp9P4XzcKMohC/6MwFViz/oNuC8fPI+5ZFdT0BNmDk5 ifO0dL0lr76JgKbTMSfEsa/dky0X7SBgw5MaQuUznifTpapKXfh844pCW3E+ lyweSzLmERC4RFJXpYZGYWfKr4T2EeBtq12wCuf7isURI4ExAkJdg9TDKnC+ 9nTYHJvE52urM9mO56Vwl8Wpyr8EGLW3POsvo9Hwdv3I8HksMLyWG7ChhEY2 cgrNK8RYEBZq7nqmgEbKE8MOMgosKMveHqyP53n3kPPpECUWbKqR9c5Jo5Hj z6+X+zaxQCWrs4HE8/+g60vK860s+O1zcc1ECo0Wvn89oKLHgqGGHo0HeF/Q MZf8dO1ZcIpcI8/C+2bq1t/w5KMscLObTIi7g/t1/fSDRY4sMEjzS5G8TaNd F4+/rTnFApkz2jc5ETTKPmkoZBnAgrGfWfvc8P76fKRMIi+QBT4prc9EQ/E+ sNVcKxXEguJKy8mcKzRimSoZ06H49xK/x668jOulvvzW8bssMFn0a0Qe78ck lfDE93Es4LNJHuQLpNFbJcGcdQ9ZUI32U93naDRGjTcPPGFBrOoOtQJ/Gokx 3fr3prAgT2h9fI4f3qcSfdNZqSxwSfY2zD+L53NJG9M3iwW5L6qcO31p5Dff bENrDv7+bDv7WR+c17lq0MhnwV3O4Zi12JlTOqYPClngbSZnctgb79+RN0fm ilnQsEuqOP40jXp/q3nbl7FASe+B3E8vGvH1ZYSUVbCg99CS4p3Yqh2Pn16p YUHhB+7xZZ74fEqOkxm1LJBEqedve+B9Gqik39LAAuZ8gZVs7Pd1o1F8zSyI yhK3yHXH+4tT8FW+jQUHejaftMa+4H1x875OFmyObvETwrap1L90lsuCzrj7 WUVuNNoqKVL3uAf3e9m2rZewxZ0bWR++saBkKkh5H/ZgYdyp4X4WVDS7Vipg fxSxfyP1mwV9R+cYy7FT7NYIaw+y4D/L/eaC2MFZvw84j7DgmWrK7XnYdoLZ T2+Ps2C9vtqMMLampd9kwRQLPK5aZHCwV6eA/tcZFvgVnqjRw54OEDAS4mPD umtt3j7YfUnHPeP42VCZJ1uZhf3lU1WskgAbltlX0X+xyycUS0oF2TBjZdy6 D98vix3RZynEBqk76vXZ2I92jYj+XMAGOoHzVQbX64an5ZbARWzI1IqVT8AO uJd/aMUSNgjwK+Up4no7lUuHJAuzwXrI61k5ttXvwDQNETbY+/xd6YT7o7eq p/GzKBuUCVMxJu6nCtKbObKMDSmR/Omd2JTjU87kcjZMRd+Y9xz3XyxS2Oia OBtC1pxhX8X5mM1382SvYkNvjJqkJ85T6xK1EgNJfN7i3+1uOG8VKrF9HVJs WOySURaE85htOyPqIc2G3WVfSpJwXiMySg/FstgQsPziJvHzNDrfIhuynmTD wOfAPDucdxf+0LQSig0xau0XCvA8GJjtmemXZYOq+Lqxe/j/glpAFuf8GjY4 HtROJ/H8yCStNFq+lg1604JlOSE4jxPtseqKbHC4YCmyCM9jXpzjlnBlNsj2 f7K2icTP07LqQywVfJ74VbIWeJ7v/FIKeanKhgUSr0xsomjkvmOssX0rG4YD cp9F4f8b8ryLnoqIDdtDij++xPti1ZLe2LeAf//pVAuRRCNBFYMScy026K+J FYxJphH3sojYOV02tHT5XcnG+ydm7b20GiM2tBt3JdzJpdHoiF5S0G58f5Op huevabSnaPj+tj04L7Hagk1vaCRkZngtyZQN+6+JTJuX08g7YMrpnDUbgvI8 VovhfW36eb/8+hNskHPR4bMcpFF6rAC7x5EN4YNd5odHabToaIZErBMbkHXN GZ9JvD8mhRbMP8UGl7uWfjV8XWgD9aq34zQbhIaqNCSXdyFhb/HEa5fYkCu7 UP2vWhdyRG/jtIJxHqtUTT9odKGyRS63Ji+zwW1H7UQidCG/h2UXj4aywU7F ccbbsAv1V3raaUawwaxTUv3GoS5UIVXH/PWADc+aspv2X+1CgW+vxxjls+Hc RHC1D7cL/eh8e2fqNRsKHiwLmu3tQpZ/RyKSC9lgc84Urv7sQopqB0IF3rKh Ljbo9aPxLtSSKudXUMEGUSaSchPiIuW7xQcVGvHrrA10sjQXfXMdIpb8YcP8 7QFrCQMu2hcuw8gfZMOdx5J3Swy5qDBlv8SJYTZsXp8war+bi273vBEtG2ND 33KtJbGmXATWYXz+Mzj/8jfCO224KE6Hw/uxiIQfZ//Iprhz0W6GRdIHGRLS nSnRe3e4KOar0tuDciTMEuT0lWgu+pq2sP3XGhKcrv7Kd4vhogAoFBNVIGEz 79/lDfe56PkxToDZJhJCfYoXuiVy0eLMIdOO7SS8iPla+zWTiyzPVru6IhJe qT0S8MviogStpKuzQEIfmHkuyuaibU1WRWwdEsZX9/xclctFjtPFa48ZkqB8 hlPys5CLKnVu8A1YkjBPN77nbCUXLRdxZARakbBxLfd35nsuOtS8U03sAAlK JhpCvCouGj855qxsi++ndeeo8kcukrtp0+xzhATR/aFC12q5yNNKbXjBMRJW 7rZLu13HRUWk2NLY4yTkPvnsFVXPRRbZZVoFJ0nwqhJxv9LIRcGt69Ln3EiQ u/w9U7aFi2oTBKsiPEhQ/+bbMYst7UL3kF4k3A3eZVbfykUvZyMldXxIqHIR Acd2LpqtdFZp8iXBKivl3boOLjKM1N1z/CwJQVm1Od+xeZyp4KsBJPC3GE7t pblI6Xd9vOR5ErYV7D78D9vv1fPXzwJJiJLbYfGkC99/l93gx0skZFXvl+Jx uWjnqcqDy0JJeDPyGBE9XDTd0q9XHkYCZBWIp2Jnawsr+14jYWhb0fCmr7ge kvsWdt7E/W34KKzUy0XcIK+Rm5Ek7E1OdE7Ejh2IorVu4/s6jq1e8Y2LhMvb slOiSZiI9n/ajV2h9C/+YAwJrxuns+A7FwXGssJF4kgImw3ZH4e9VVDLp+Qe if8f70kdwB4+ddT+9AMSEhX7S7f34by0hhiviSfh+fy9L69gH9N5uqXtEQlE VHfkR+wWyYGl8AR/f0KXu34/F90KFpsaTiLhnmjvg3PYRn+UvyYlk/B2Umt5 BrbgAYvPVk9JGGDK97ZjF5X7vl6SSkLajKSS4A8uOrMhLqnoOc5r+rCgPPam uMIIj3QSLIrpi/rYPwS7/GUycf3mHXzjgP3Ejf9E8wsSImyVa89iH2rjmIa9 JCHjhn/DNWwJXb3t23NI+DIYzb2HXZvhKD/4ioSSLYrLkrHDpMJXJOaRECIv H5iOrXM5bdbiNQmHd7/WycL+9+dz/8JCEsSTTAP+71cHhhsL3pCgaRIPGdju 78TfniomwU8p7HkK9rqNW1LJEhKWRKu1P8TuibOObizF5+ma/R6JfX9+wMUr 5SSgpZ4DF7Et3R+6qFeQQNrvW+yGLdb+dv/vSny+0ev7rbGrdHu0HlWRsN9Y bxiwL2XOVzKrxvPQVzYui63JkJcUqiFBsuHMxYXY45cNBfM/kbBm47/0Plzf jEGXP861OO/lwvcrsKmKF+/qGkhQXWInH4DdsbExM7iJBPyPjN8cO+re+L0t zSREvykQWYe90EPD80Ebdqfgtjrc79J2W9u9HSS8ZEhEJmD7610wEKDxPHBd bnliDzDeESe7SbguQS0QxW6sMKlW6SNhnzmMa+J8xUs7yHwcw/OdtrI1BOdX fbOCksMECaNTOhrm2I27RrdMTpJg3touTGEv9A0xkpkhwdS1yaYYz4N73TPP gHkUSAos2SmAvbjPK2C5IAXNBgsyv+D5eTKrGZIynwLbdct2/X+eWhQ+xzYu pOCqlY+5FbanVkyi02IKcpNFRjdiC1vbp/EJU7DCQ2H1EmwIGXmrKEqBRMgH vXIeF7XdL/xQKkbBE37Tc4nYp19ebrRaToHo7mMRwdgiH0zogRUU2FjGRp3A TuFK9AWvpMA00DzBGFtrgjskJUHBQbma6s3YHUuf/c1cTUHg5oVrmNg+Ml7z 9aUoKHja/H4h9jINTdFOBgUZmq3vxrvx/O2bL+nFpODjj9PK37H1HD9Ri1gU LLvfTrVhc8/fVYxnU+Dxbn7qZ2y/KDs1VYqCObEsuhJb/PlaqOZQ8GPx0bpS 7PTS4V32shS4NThEv8U2aC0wm5CjoKIpF0qweX+Cba/LU7A+eH1POXaAkMkJ zjoKOJImEdXYq5gSHvkKFHTaOhxows7czPXbs54Cpo+7GQ/b0PBpcK8SBU4v 1K8PY3+187zhv5GCWvsdkkL4fud9NWKWKVNA5WUt/P/9V98QTEjeTMFo0hWX LdhZT2pSt6tSoPruqIUFtnFBdE6DGgWPdFMafLC/1R0uPrmVgnncYxP3sC/0 yVfNbcP9/nys9v/9kpobqo/SoECqlnNqCDt7ZUGHwnYKFGQ/dZG4vyaKwd9K dlBwKFFHxRI7yHrV9O+dFJi8ulL8AZtw7xII1qagMjRo+RKcr7yQlKVSuhRM 6qZc2IP966U6qWdAQdqtnT1fsUM+CCh07KJA853JkCrOK7v7o4qnEQX8cdm7 w7HNRQ4bPDShQOaUKKmN9/GAjLypyl4KDKp/pydhX9UYOvhhHwVGG8fzhPF8 FDoGuY2b43q+vO7chy1TlhxtcpACewMP22Y8j58UJ5902FDQeLVDweb/+zLa 4KXTIQp6WyMje7GrT/Z/DrGnYCP/OyT0C+ddTGFR8QkKzhg304ED+Pnn5y+x +yQFXk88yXV/uOhdT7VsuxMFbTftFVuxV+e6aE24UnBumW6a7hAXFdum+284 TYFltlKF1Sh+3lfOhr7xpmA8viVv7Rh+vm3aE2PkSwEhMnVjDvu44GD2CT8K 6r89/pU/gecrddNA/AUKAiKOh5/8y0UHJrPtxK5TQIfJymYLdCNBh/luD29Q MKhV6dwg2I3Sqy3OKUZQoDOgETYxvxvxx4/HGtymIHRBLzJZ2I1SdLc2XIil wKqkRFx1aTcau1WgO5REwUrbrWE9Et3o4cwS88BkCp6erOjbLdmNDI7bOCx9 SsFCEZHiQqludH/bv/Nrn+P5NJzISGZ2Iy3ujjz7LAo+ByvEv+B0o4j1pevq iyiYGAtLvrYR/97Wg4suvcV5YfufPaTcjYq1R79vKqXg2vLgUhWVbjRgLZcU +Y4CM7f9vgNbupFRSBhr30cKwrS2X72DupFQl6l4bSsF3xJ2KNzb0438I3r+ 1YxS8GFNxoCAZzc6PiJYV7WOAzd+78+Ggm506JnOJxtFbB+IdHjTjSztg6v/ rOfAI6PbvkHF3Ujvs0DFyk0cqAp+vbK0rBvJpc4rsN/CgUtqOrc3fuxGvQ58 SVPaHHA0q24t7ehGR+v/nllry4Efjf4S+jPdyCZUw6fwEAdWde5Llp/tRubg 77XHjgMfvveoLeDjIZ30aVfvIxwIaTlPFgjwkEzYlEPJSQ4Y3+O8n1nMQz07 J4ytfTjQ1fZ5d+dqHmqbVDP85csBW6Gle0KleKg+w0c/8CwHmvSrH26S5qFS 5vjOpAAOmJ4fEPJl8VDC1Kja0CUOTO3JX9koy0MOL4bZoTc5kFayka9uEw+5 XDKbMYzkgOt+6RTHzTzkbZbdLHybAznVHpv+qvDQ1THvGxHR+L43HerFtvJQ +rapv3cfcODgq181/7bzUN7iA83W8RxIveo+64x4qKT9dRbjMQceO6UNNgIP NZ4LOBn/hAP5uu4r7mrz0FTJ3Jf/Ujkw3G2o2WHAQ/Nu22U5pnEguNrXnm3I Q8JHS66vy+DAvY91eoeNeIgQCtJJz+JAfeyaAzW7cb0MhbJy8nF/anvHnEx5 KKJe+Hp5JQeK/ju+IvMAD8UlujqGVHGgZuQnK+EgDyWe/qRtUM2BoXVeO2/a 8NCrVRHT1Z848Kx0Xt+BQzzUcWCFY0MTB+bn3m3Ns+ehbwqntaOaOeD9M/Fx sAMP/ZlpJPa3cmBbmWa90RF83vjoprYODmx+ZfXw41EeWtMjqc3r4YCnyuK9 sSd4aGO2H/GklwNr50dW7nTkIfXL7VPHvnOAX+vNim/YxmseZPb/wP2tqjhO OfGQpzObGBriwHn1XS+dXXgoQPPiVNYIB2jPraGj2JeX8hpPj3HgP/WnOWdd eSgmIzF8cpIDeXXlVmdP4f5eEDzxepoDAT/OjYxgp+47phUwg++bUKfo7MZD 2VQFc8csB47XeEp0YReNyE3NzXFg5rlFxR53Hvof6XsnYA== "]]}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesOrigin->{0, 0}, PlotRange->{{0, 10}, {0., 0.5762099145626105}}, PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], Scaled[0.02]}]], "Output", CellChangeTimes->{3.5020884331011515`*^9, 3.5023557055283737`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"BodePlot", "[", RowBox[{"W", ",", RowBox[{"-", "3"}], ",", "3"}], "]"}]], "Input", CellChangeTimes->{{3.502088495859741*^9, 3.5020886108253174`*^9}, { 3.502088861436651*^9, 3.502088868594061*^9}}], Cell[BoxData[ GraphicsBox[{{}, {InsetBox[ GraphicsBox[{{}, {}, {Hue[0.67, 0.6, 0.6], LineBox[CompressedData[" 1:eJwt2Xc4Vv//B/BbCJG9bzt73Tcyst5HIZVd+URL0kaDUhISipRVCiVkK3tE 5bwkQmZJVla27H1bv/O9rt9f53r88T6v93Wu1+v5Puc6kk5Xbc9tI5FIQXQk 0v+uCzLJQSGJZKD1KizeO4xhqebi1RqvydC60rD+zRLDjrnHMv55SYaE+DsM 3Acx7DOEB1DCybD+Y4QnFcOwoOP3/Ft9yKBfKKnRqIJhQhF2PmInyBDuI+wu xoxhhuvMt/L5yeDRvHf+3h2EPfzheq7zsTA0x+geIpkbYjIXckoaTwmBfePM UctyPcxzx4xqsYkgcCe4684e34OZOLzXlVQXAIXcl2aRjNqYWORAKZWJH0ZE X04Eeu/Gstr5T2nM8IKqFOlEp5g6ZsxUebOzggcoXYqG6qIU7NjAhCRjDDfs 7VX8wcmniEnU88xLBXBB8+aHxN3OMtjC6wLtof84QfzUpqiTlQS2up68V9OX HRgu8jqdkRXA6AS6DdPs2SC3KfF9Ui0rJkFHL+XEuANIRjQeNYNplMYsb0Xf wQQeUeoMidaLuEmf/tnJe4ywLFscpGDPDl2chxJ6VOiBoc3gqWmYIHSc+k+u mJEO7B47hbW7S0DXaqri+5Mb+PUYJQe5JGko/n7eUdN8Ay+qwPgHc6Uh8rVs 9GfdDfy/I3tiYnBpOGiUStcosIGbVNxtnuqWhrJHKe1TLeu4nrjITiMBGYgV SA6imq7jjOnnWO+FyMAxzcSBAtU1vPCYCJn/iiy0XouLLdtawc1cPu1c4pYH akWkQMO/Fbz6/WeWXAl5eMIV8qy3YwUvn10VP60qD6b5t58yFK7gMyYXPV8d kIfS+aP+lhdX8Bhu1B3pKw/xtzgvDzQv4xUMI1wXxuThonfgnh1JS/haCu/x W4UK8LXeu1gkbAnfNZ8/UAkKICnqoUHxXsKV6RvDGRsUoPOzk8oRuyU8bCzE 7NyQAlhsIcn4HUt4wJf3Ac/5FEHdn8as7r6Il5wsuF/orghrD6+22xsv4KGB vLsbZJVA4m32069qC3hlhvPMWTUlMC6fNKaIL+DRIyfKp/SUIHThSh4DbR6v sZ4L6rNWArEzF0Nycubxd2Nz0bu9lADTPaPPSJ7HkUHFrdd1ShD0zzYhd3YW 57yd4OfmpAyZTJF25N5ZnJQd8SbwijI0SbWwBdXP4sWcL6rDPZRB0N7qzvG0 WZxr/rzGgyBlyKg6ZLv95Cz+YZHvU3uGMtTHGzOcqJnBf+2rDjSbUgapJJdm dsNpvO37m8vWbipgVBaS6ESexkknEqyv3FQBxx/pN4pXpvC/eeqy3t4q8Gbb EO+pgik8UK8vxzdEBUTOnrR/Lz+FF/p25LCnqgCftOXAIZ5J3Fk0XMm6SwWY UykLj0bH8Q7JDHd/Q1WQK7eo6q4ax3U5ekSdjVXBtO1KNPXtOC5MZTysf1AV Aren67SfHMfP3F/waD6qCtsuSNyT+zmG/5YR2fPIRRXW5Li2V38exdfZ6qd1 X6rCVMacAH3UMH5hAWTbR1WBHff1vOI6jBunOH9Zn1QFSivb75/7h/F/icoK AvOqcG1TNjp5fQhntgq9o7KhCvO2x3lNzw/hCdLcnP2cFFhZq+QM3jOIM08f vH5FiwKCXDbXZnkG8UmF4ewZXQrske1psp/6i08w2Bi6IAp4Wa88VXz7F087 f8zD1IwC68nKO+vZ/uL8egoKj+wpQGf5nIWjrx+X75XaaeZFAamzUpc8y/rx WM+s/7R8KLD3dk5N77N+nP9Q3R2yPwUCkmof5h7ox8efvjlXF0yB7csbjLYF fTiZlRU+vqQAP9bAoLizFy+xtw2ZL6SAwuDVJU2HTjy18Uvf5DCx3x+1PvS8 nfjTpxcOR48R62EXU0tDBz6zmv5G+x8FBuJ+C7gYdeBvrM51Oc9SIPYw2pMk 344PXVy+c3mNAmyV7N7sy7/wWrMqHx4mKtByLzJ05/7Cd+++XUNhpsJo/JfQ jMu/cHHurXQzFipUed16bdzTikfUyOhcY6WCj3pPuVfVT5wm8aI5moMKM4nv 6UaiWvBLiYx9+wSo0BPGFFJo0YLPBTmkKwpSof7eGW5/phb8u1eiIrsQFTLs +XaJ3m3Gbdg/O38XpkKlFO1R6tdGvC399F8xMSokbL6PMdJpxFs08nMmCHt3 nsnszmrAL5uHGheJU2F3ZO137qh6/Kyub6OhJBVS6WLYfc/U4cYmzOFK0lTw /2MuLvyrFlcleTf0ED5dSqIWmdXi0p09vU9lqCB4/aLNBKUGF+VaeTQkS4WQ Pu1n/21W4Q3iPFyuClQ4/2kiee56Fb57sVOYSZEK+16+KXoy9BV/VJhKH094 3Yrpd2V9Jd7dGHfrixIVXPE2IWpcBd46zLw5pEKFR7M1C6FcFXh+Ql2ssyoV knZ9bBp7CHjXQQaDPsLvOBDr/rFy/PN0+bNGChV8E5oHVF6V4ZI6B98+VKNC IUPRy5FHpTinEZPPFOHRizGWiTc/4PLDNCdbdSrYqjmV8VoV4/BS1oJLgwrS X+Yj1ujy8YXHeVlXdlPBXrZ9f9FULm6nFtpfRpjMd2ftT3EOni7cvItJkwpT KTt+fr2UhW+v/9sQTfg/t5+GOvsy8Fg/0OwkDFqvMrNE0nBhFYlMYS0qRH1T 8Y9sSsLHL7J8iCS8HrY0yZiRgEe83m9TR7g+16dgjuE1njV1fWmTcLwR5+OO kpd4lJ9pGlWbCtd/JDrB5Wc4G8fts6cJG5/V0E0TDcdTOt4rPiasMhq8SyTx IT4R9mC9gHAKj0PKz50+uLdBcHsH4b73GFNP/iW8X3Nf+Tph3hfnbrddsUFm JMX3IjpU8JL6iRzCbiK6fZnJewi/vFp9rffMA/QrWzr5MOE5i7cVXOuPkfz4 ZOZlwrL8GIvUoUg0dNfygw/hI4HZanovo5FBsf/3MML3F0QcjgzFol2JZX9f E84++9jfVf0NShsUImUQdhvzPlqJJ6L1/BLxPMIMkoVjVsNvkWN+vFEx4bhj E/e62VJR/nC98wfC6uFS3Jc00lF3rMajEsI13+xTF+0z0eKBkswCwqe3wnX9 /d4h2UeU7+8IL2nVNLKnZSPLifOjSYRNS3zzGs7nIsd5YbpowtyH49Z4vPJQ yNwaTxDhP1PFJg5P8tH6wjtxd8LpIT/CEhIKUHB6pdRJwh6yUx3DBYXoz74a sjFh9IVFWuVbEQpw1WSRJ7zjlIybe2cxeil1e4yZcNsq9qF0sgSRX0+XDRPP O/H5iW0kulLEqzt5t4Kwi9ptc1PeMmR6ulAxhrBOQ1R0qNxHlOzoVeVKmP5S Tt8P3U/o4rnzBxHhRobvikKWn1GzeUTJTsKxCcMep8+Uo/BIRtYOol/O6W/D Uzxw1KOO700kvFn6SiGmAZCteYadPOGeqCnecacKtLKh7t9P9Ge5K0bSW6lA 40/baf/rXx/JwbZuqUqUhyK/LRH9fmpN84vKh0p0kcGXL5Gw4a+H730sviKj 5zrJ+wlvPlIKkLhdhUrpft8KJuanx+ne1es7q9H9pJECacLl+k0OX5KqkZi2 iPQnYt58Zm6oOTd8Q6Ebh8N6iXnc/K+sJ02qDhX6FMmsEPPbo8ZWt1JSh8wd dCI8CJeznio6YPEdtXBZck4S8+6D04VOeNajSEqG9g8iHzZlD+yhNDSief9t WS5EfvSQ4qT9nJoQ6WiaRi2RL+Wd/zhalpvQjTtmmZKE0X4z9z0RzUjhX7N5 tTwVtmgTB7o+tqCTBeeb/xB5Nj3yDH+w/QcS1GbXECLc22qgqWzzA73eH/ef NZF/eHaYxL3hH6iZbNWYJ0XkjZPGshhXK2q6pV6JEXl61arb5dvxVpQp2xNk T+Ttaf3AgauprQiCzDtcRYn6/L8bQO8XepuQyh5MJurXeiU7nW9D5vvGZx8R eT9dvEuYNa8NFdwVOnuPn6j/tj6sYK0NlT/Wl3flI+rfE7vLEPEbXeUPfmrI Q9RX+2KT+rEdvVAcGUxjJ+73kmVrjLMLiayocj1hoMLeLzeyntt1IbZ/KywH 6akQMNH1n9GrLnQyr8hj2zaiXw2zc1/KdSPMw3qjbpM4L//aOu03/IOqA/tG hucpoKryqir5Si9aieccs+imwHU7xhvWeb3o7U9VUOmgQKGvm9j6Ui/6l2Jq S99GAdFLCR8VjPpQ1uT9w2FNFHj78Qbv/fo+lOtMcZP/QoEcR4Fqyt9+RNN5 L3oohQLWi4deMW4fQC/OZCh5J1JgLtjvRpf8AMJyb/glvqaAZsGY2EO3AbQ6 7vu85jkFPjJ+8uxZHUDaZHWvwEAKfMt0VHjCOYgU11jNE50ocBE933LSGET1 TkXZLKcosKO19peO3SAKtGkKcibeLyyIvh+MG0Sns4V4Z60o8NOKsUtPbggl LwvMndGnQO9CRui4wTByT7B7/oCbAn6hV1uzzg6jrbtDUqFsFJCQ1hRxDR5G fzOqBfy3U8DxMGRNtw6jOr5j5zRpqtCX11a3cGUEvWrPTizoI+xGz7IVM4oG b0Qbd2eogt/2WmvAR5HvcNuvhCRVkIh/+vL+0Cja9uC4qFWcKjg2CMkzqI0h IWwXXAhVhX4l6n6WmjGU+0b43X1XVRgYPRHIszSONtRERviVVMHfT6qhlTyB dt8pST4ipQpSgqO80UYTaBHrsvQUUgWn/e7Jgk8mkNtE2fbLTMT6lOBKUel/ qPCGyxatXwX+OhXTydtOIsfsySs3I1QggHb3wJjnJGqa62T7FaQC0pFGEZmv J9HdFAELHuJ91rmiXkJlbBLR7LV/KZxXgUHxv0jdbwqJynhk5ekQ7ubw0c+e Rodq5mtK25RhocfksMXPaRQjA4ihThkY++/Kn1qZRtdi9S/IflaGqDn3MSQ5 gx6z73eZTlKGwqXeqDNXZpATtVr8gYsyLG+WjCZvzaDu1lutIstKQCIdPqzC PYtGjb81PxtRAma6qc9F0rMo6e2jwI7fSiBILx1VfWAWGbsttlSVKIEuU7jB aNQsGh8/wsB9Uwm8OS5GKsnPoZcn+9zTBxUhgJN+o0B3DnncLj3i26IIoVzx F/Qt5tByvNNNnnJFeM3Tqm9xYw7dLQ+ucItWhHIBbMTt0xx6T7s527hPEaoF u2yWG+fQEfIlF1dVRWgUuvXJt38OxRhWzZcLKkIv+V1E+PZ5dIlzyOXmPwUg SQjq51vPo2PRQw2M4QrALFmQqnt2Hjk95Mvmvq0AnFKWXJU359EzhXix6tPE 95Z0wPDP2HkUkng5QUhVAfbKz4QvDs6jnBfLY4bV8hBIrRnSubOAuKsyQvMG 5CAJ4xHzD1lA4WWhjvur5QCsT9l9j1tA3WhC+nqGHNCuLVSfLF9At7Jeu3q6 yYFbnkS6P/0iesia9451XhYeV1zp+867iJiac8Q2f8hCekuxIJ/sIroqgfyu 5cvCwKx5cJrZItpR1vak9qos2KnfuVz/ZBH5t2osLf2VAfe9X5P43iyi/ITU 2ChcBsJtObpO5S6isuG3L6JjZaDuRsqh2R+LaKf96gewlAHDghZlfsElVKj9 XkgrRxpkdytOn05aQq0pev2Z5rtgn/FNuYyCJSR3XIY9UWQXOB6B03Nfl1Bv lct4zoQUxHrYNQeMLKE00j7rjSApYC/yz8tQXkarfp67wvIkQamqYWzOYBl9 bGsqCbgjCWa/BKX0rZYRiV2s3Q6TBP/F7MjG68tIw+VxiEudBCxrdrnPFy+j a1w3djyPFwdeU9l3+jXLSOd8pqGcsDio210fDOxYRm9m+c/UR4qByy2mo4Lr y8jOMa963EsU+oo1tAyMVlB66fB9r11k2Kj2cQuyXUF1Clbu7wOEQfh3bWrT 2RVUOPA7h21ACI4snxZwClpBu33dxqrCBaFGO3Ql6PsK6trm0ihYxgfOtW/G THpW0Df9f0aio7xAOl7QyTC7grSfLMhrcfLCHp/OT/78q0j+Q+R4kwU3ZH6V v+9zZhX1NK79Y5ljA1M7/RsGHqvIZKdJm9HgDvg7YnV2PWgVTe3kq235xgwi rJ4mXu9W0eVnTFLlTgzwxKaK5dbyKko7qWex0b+IK/5tp+3eQUPjo2PWl6Zm 8GqPfxPzIjTEq2dnzdw2gm++4Gm8vpeGUq8mWfKQPuOxCnI49SgNXVzKf8yY Wou0P+rmTl+goaPNrVqFJn3oWs+ZSNcnNLQtXHDO/9YsYrt284FyAg1l3RGs KcxbROl0wR4T+TSUl3s8f/z+KjKOenUus4qGLFUpYqHf11G/dK7dpXYacm7X xO7e2EI+xZX75SeI/eQO9O7IJmHCZr91RjZoyCc+SOS7Dh1W3DGukMq5hpIk aj4Y2NBhtlc2hc/tWkO5n7zGDeZJ2NQ6F5u0FuE+2ydm4iTs8VOZjQGzNbRm +ozSXriB5CX2TCUeX0NGqzJlFsdp6Gueea+j2xpiqjNFHw4sIcd9js3i99eQ p/+9Dzpxs2i91b2iJ2oN7fjipTz1exRprsS+PVG6hrg+mL+1/pqNfgRnPyPX r6ETs5QXjQGtuBv5S2Bnzxoazs/cqCgZxlMNxy4cY1hHeDsqe7C1jAsGaisf sVpH2y70x/HfZoZC/kOiPE7ryL0tm/WQNytYp59i/+Gxjnp+y0qLurND8PfA GavYdSS/U7yMROYGGldr4aGhdWRWl/CbFigAf+KvGey7u4Hc/u0vNXksAU/R 7vUvoRso5ZNu14edkoD1LZftjd9A4ymk7J4nkpAk6auzt2IDZetzTUU8lILz yU80jJg2kdplr9oEJ2mYyshUQFGbSNctLjC6Sg7eHHQbLU/eRKozRVN7lOTB ekItzbB4E2XtWX0aFCYP+cql0oYdm+hC5J9ekyMK4JnzTdxAfAup9dmYuTUp AqlokE8vawsdrMDnv0SpQN7R9NayT1tIsCxQT2lUBZyWrkTpNm6hLHm1M5/1 VOGr9jyn7uwWcosO/XaTOG+N/5CCXpFJmA6jGO7MSQVmR477cWdImLEik40f pgYR55Q9YyZJWHHhbmZXFw0Ish7fo7JEwupMthnEhWqAl176OmySMJMjthEv 32mAM5e0/ygHHfZakvUswz8N0PpMfqKtTodZC1W1lF7cDd28rG9/3aLDztYw X7J10ATZr2ONXKRtmKHWBokmpQ2fpNJkQ7jpMf/pLLmr53ThmmVtVTuZHgu7 HvLK3E8XpL0mnOVk6LFjxxQr+eJ04UkL5e1XbXqsyEfHzqVZF075fRDfOkGP cfscf6Guqwd0PbWCHmn0WKeBrOXpHfpgGvNvxyl9Bmz7sll5V7wBNHOoT6ud Z8Rcb7r8MrPBwLu33HU+gglb6rE4W7a4F7h6jzO6/GPBqDTqcHa2CRhW0Gw3 xdiwtjd0ae5yZuBxMMEz2JQdS3qw3T465CDU0WV1nrPkxHIZu64VkC0gtSmo NeocF9bK4ZA4fs8KPIvGHUSfcWNZQYLM6cw2UD/VYr7rMw+mIqgw1HTIFlyF yoS0fvBixw9S8zZvH4ZtJxTdkzf5MI6JWY4L+BH4GxaXJi4ggH3d/LjJOnMU zATC9wsoCmLU1vbnacL/QVIxm8flI0IYl7E7KebUMTDbH3K37rIwJqF24V53 qD1UZhffTbkqjHVrk6WkIu3BkP/vXT8PYUzMMan6wgt70BjS89byEcb+VClx zCfag9iDSe+kCGHM2l8rnqXEHubLrX28Pghjr5wDC7X67SFeS+C+4nYytoRS voZrOoBQ/L77jKxkrH7L27lN1wGeMV6738dBxibfaDCIYA4Q3FpzP1qIjN0E w31pBx3A44aX/zYVMpbI+wv/fNoBDmT/edB5mIyJaRsXjAc7wFe+HQFFx8iY xrCKDTXMAQzvaQWEnyRjN8TXpm4+c4Dd5mEBphfIWP9eI0W6Nw4gNo4F5nuR saeZD94IFDpAjI1r4BNfMpbOFqF/stQBeEtjAi8GkLG9OwM6ksodgOXRXKDY UzJ2apTMo1rrAAHTYkGrkWQsAqvIcW90gE27Q0GtL8hYprqFeelPB7hT7hmU 84qMsa3jo5vtDvD//xMwvw6hQOMeB/g/pvgUJw== "]]}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesOrigin->NCache[{-Log[1000], 0}, {-6.907755278982137, 0}], CoordinatesToolOptions:>{"DisplayFunction" -> ({ Exp[ Part[#, 1]], Part[#, 2]}& ), "CopiedValueFunction" -> ({ Exp[ Part[#, 1]], Part[#, 2]}& )}, FrameTicks->{{Automatic, Automatic}, {{{-6.907755278982137, FormBox["0.001`", TraditionalForm]}, {-4.605170185988091, FormBox["0.01`", TraditionalForm]}, {-2.3025850929940455`, FormBox["0.1`", TraditionalForm]}, {0, FormBox["1", TraditionalForm]}, {2.302585092994046, FormBox["10", TraditionalForm]}, {4.605170185988092, FormBox["100", TraditionalForm]}, {6.907755278982137, FormBox["1000", TraditionalForm]}, {-6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.809142990314028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.521460917862246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.115995809754082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.961845129926823, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.8283137373023015`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.710530701645918, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.506557897319982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.2188758248682006`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.8134107167600364`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.659260036932778, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.5257286443082556`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.4079456086518722`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.203972804325936, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.916290731874155, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.5108256237659905, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.3566749439387323, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.2231435513142097, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.10536051565782628`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.0986122886681098`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9459101490553132`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.248495242049359, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.551080335043404, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.684611727667927, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.802394763324311, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, {{-6.907755278982137, FormBox["\"\"", TraditionalForm]}, {-4.605170185988091, FormBox["\"\"", TraditionalForm]}, {-2.3025850929940455`, FormBox["\"\"", TraditionalForm]}, {0, FormBox["\"\"", TraditionalForm]}, {2.302585092994046, FormBox["\"\"", TraditionalForm]}, {4.605170185988092, FormBox["\"\"", TraditionalForm]}, {6.907755278982137, FormBox["\"\"", TraditionalForm]}, {-6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.809142990314028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.521460917862246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.115995809754082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.961845129926823, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.8283137373023015`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.710530701645918, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.506557897319982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.2188758248682006`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.8134107167600364`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.659260036932778, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.5257286443082556`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.4079456086518722`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.203972804325936, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.916290731874155, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.5108256237659905, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.3566749439387323, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.2231435513142097, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.10536051565782628`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.0986122886681098`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9459101490553132`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.248495242049359, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.551080335043404, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.684611727667927, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.802394763324311, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}}, GridLines->{None, None}, Method->{}, PlotRange->NCache[{{-Log[1000], Log[1000]}, {-107.47293212437035`, 32.65228142304109}}, {{-6.907755278982137, 6.907755278982137}, {-107.47293212437035`, 32.65228142304109}}], PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], Scaled[0.02]}, Ticks->{{{-6.907755278982137, FormBox["0.001`", TraditionalForm]}, {-4.605170185988091, FormBox["0.01`", TraditionalForm]}, {-2.3025850929940455`, FormBox["0.1`", TraditionalForm]}, {0, FormBox["1", TraditionalForm]}, {2.302585092994046, FormBox["10", TraditionalForm]}, {4.605170185988092, FormBox["100", TraditionalForm]}, {6.907755278982137, FormBox["1000", TraditionalForm]}, {-6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.809142990314028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.521460917862246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.115995809754082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.961845129926823, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.8283137373023015`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.710530701645918, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.506557897319982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.2188758248682006`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.8134107167600364`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.659260036932778, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.5257286443082556`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.4079456086518722`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.203972804325936, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.916290731874155, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.5108256237659905, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.3566749439387323, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.2231435513142097, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.10536051565782628`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.0986122886681098`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9459101490553132`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.248495242049359, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.551080335043404, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.684611727667927, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.802394763324311, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, Automatic}], {189., -118.66252583997979`}, ImageScaled[{0.5, 0.5}], {360., 222.4922359499621}], InsetBox[ GraphicsBox[{{}, {}, {Hue[0.67, 0.6, 0.6], LineBox[CompressedData[" 1:eJwt2nk01c/7AHD7vu9rllxblAhRzGSLSvabpBLulZJ9S4WytFGJkKVFSEqL SoryiHwQiiRbSLKkLNn333zP+f1z73mdOc8873lmnjn3fc5VcPezpzExMDB8 IR//+56m5MZfuisN76r/ancGUSF/j1yNTrY0OBZfXG0gdg7KYP2eLg25Kh/L KojfwrXYTdek4YkWA3cecfyBM+daI6Uh7eXJRV9iySRq5DpXaeB59oCfgdh4 mSO0WIzEGzjeFgukwoRi7MsDQtKQvCAczU6cY7U2zcInDe9LPWznA6jAnjYT tI9VGtwLj1d0EH/e3B+wPCUFstZKXzOJ3b3KTlg0S8Ebq02fZIjPt5ygdV6W goZzW08K+lOhs71ET/m8FLCeFixe9aOCRu8ae+A5KbhcUNs6Svx5NKmQ86QU XFHx/vaBWIq1ZHwrXQrkm681hRM/1l89mYalQPEuy4lOXyq0ZV254jgjCf1r mwoun6CC6r1vh+9MSMIpm56hEOJTD+Q3/xmVhAe1I7xuxPIlxV9i+iUhYttt ni3Exz61STz/JAn1xzSbO32osMood0+wUBJmZQsPrCemeD151XRIEsbnRG/c PkaFYu8Ep2MuksCy05//AjH28Z5ipUrCzV/Dfv7ELgHrNxlZS8J7nqp+THzt VFr+w22SkMQ0m9DnTYXFq1E3LkhIguzohw4p4qZSmyCTFgmQyG4+G+FFhQNl GoI9jRIg+M05/jDx8FvOJyfrJOBR96YTZsTMVVW/n4IEeMTs+sFLvLVR313u iQSwDacevk0n+/VDzm75sgSkHzZIK6dRIYxrYmOJuQQwWroy9HpQoWRtXZfX DglAURcLgHh22vq8pJEEKMgvb8ohDu592Ht6iwTI7FHq9iT2f+F1zXS9BOAn GXnD7qReh3onPzNIwL1nQd9HjlDhUHHTi9EycRjYZNfVfJgK2fdX3LJficO6 9S1KT4i7szR4bZ6Lg65hv2UC8YHzl2jFheKwTZNP3oLY2dVC7ORNcdDmkmcr PUQFe7Z3YWxh4mB6djIh5SAVzF2KDBW0xWHpoJrLpgNUUNpUGB6iKQ6IamfG QszCcr+kTlUcGh7wLbe7UOF90R3tQDlxYNl+8MtZYsyYol7FIw7cnR+kmvdT YXtBhBRtSAwq18q/0ZypoD27c7EgSww4VrQd6E5UEPpotnUlTQz2yB4J30I8 eXtHqF2yGJR9NPBgIn5qte3fwkUxeJXXcSHbkQqa2Rt/7woTg/XXrHiaHcj5 MxPt/GMnBgpzSSUa9lRYd73/tRa7GKz6/8x6sZfsl0dQdSuTGHRN3a6NJLbf wvIpfFUUzC3SX1sSn2+jDMCMKAjkbfvdZU36Ucqbz25AFAJYDaLW9lCh8t64 e0ClKPyVijHetpsKni+XuYtPiUJyP5t+zE4qRMYnilHDROGq9Y0L5sTp+9Yp LAaKwtvlplR24sYFpGdyTBQW1q8bvmRBBT3jGLcWZ5L/Hz/1ijkVOP7jfPlP VxSiP++XvWBKhYftYod0JkQgOUPTwBxRgX4xZPHkqAgwHHfInjcm/WTYmgqD ItCq3p7/kDglM+mT9XcRMHhkVyBAHHmIZ8fRehGoPrFpf9t2st4BRqXsXBHg 2WohZGtIhfnxPyNs+0UgT3d39cIW0l93dsdbO4qAMuvK4h3iE3aFiik2IhBW 8rB2J3F/sdcBBQsRWDDgV0nRocLHkP6GbToiIETZ1q+iTYVbS9+e+POKgHdG Tr/hJiqYsVeFdFYKQ8BLU39uNbJ/hUHy+m+FASv7+eSrUkFmr9LH5FJhGP7o PIWJZ1Li5K2fCIPCmMXtYBVy3ypafqzIEgb5+kS3NgoVOI0b5fPChMGt+yVf jCLp3+BvH/00haHU9ZjKGWkqGEpcCG1QFQY1X/6jHMT5ZVsV1JSEwUjOSCFZ igpRTBmh/VLC8HLg3WK+JBW0rrkqOHEIwwZ1HoNacSokP/wRavhTCNyl55wm hEl/9I8qsN4UAvu8rzEt3FRYO6t181mKELx9q/fYkThfIUTg0DUh0Ks/bdvG RYVpt9XVkvNCMFbms/iNkwpJvQLdR0OFwKLo0ZdWdirUd+umNjgIQflfNYkX zKQfvkVxpfAJQdXsk4csS07wM7T6LOYSgo/vowqDF53gkhjnwh9WITjZnc87 sOAE7U7Xh8xXBKFp3HUV5p0gpDW3em5UECSjxkODZp3gcXNd5IE6QeiKSdv4 ZtIJ5BuEpxRjBYFdMvRH3ZATeO1WXg6IEoSkK4Hq4sSP67eyVkYIQqOhZI7H oBMY1R0UPxwgCNpuqZKLA07gUnN/W+YhQejZcJxPtt8JbsC2WGEDQcjoKt9i 2O0EXC89RFnGBECw+rF7/ScnsNsSus5hRAC8bJ8mLzU5QfrzCyo5AwJwefxd ywZileIiA9wlAJs67oRebHACsydzB0/XCoCGZbSeQZ0TRD24nD+dIwC+9zsy vN87wXT2c/1f+wQg9jJTK+sLJwiVdOGNdRCAz0F3zyg/d4L5FIafijYCQJV9 r2NR7ATLl62vuFkIgHSMX+W5p07AGjE00LVFAJbar5hPPHICMar09RZBAThy bpk1K88J/GXYOqLS+OGL2WTbxlQnCBZ2iH17hR/e84oxbLrhBOFcdzYtxfHD QH630MYUJzg7bxAfGswPO4zuT6hed4LrrSd0TtjxQ2jkPh/BK07wIuFrogs3 PzjK0fc/inOCheVcE90oPoh29g5mDHYC944bXLdD+eDFqDLuD3SC+pfxLRy+ fED9dLCzMsAJMnyPune78sHfMBRyxs8JDPs2nIsx5IO2azUKg8ec4FRVcWXz DC+0Bl42OH3ECVYuAvb14YWzY4G42NoJ6PRnHO0evDAgIuF6bI8TNJnkfN5x gBcu98rIKOx2Iv0Z4ya6ixda9hXFXLJ0AuMTO6PLVXjBNjG8bo8pqb9tUwXX Tx4o/dQznrjVCRjFu43v7+cBqQRzj3kFJygsPqpOteWB/KL5A+7yTmC/d0aU dScPpHFmxdSvc4KcOL6/7lt44LD/s303pMn+TuPMdfw8EGGW3Ski6gQXmvPm blRzw8tLDmdfszuBQILf09hN3EAbK8y4NOoIpSrLmTrK3JAcUXG8ZMQRjlRd ON8vww199BWVviFHKF68ewhzccO+w/POmgOO4OjdyrM8wAXnrK8dfNztCOkW Bt5BGVxgpPF73LLREeQZmRXdWbkgxLT8w6dHjmB841X+02VOaEuby20vdARX NZ8Na1OcIBwRF9hbQOLtvm7J6ucEvbEznwdzHUEw5/7OtgpO6PnQfKg7yxGY TPec2BXBCWwbn825JTjCQOyNUu1xDjhaTfeo9CbjkruMzg5ywFkTc5ZYL5K/ aLXy03cO8JLptDGjkXxfvT76NHDAHTmnnrdujvCVYtiT/4ADMuYvZKTsc4Sa mh5maU8OMHu/P7PJzBHuc6jaMHewQ4nsrW+eso7A5ho+l/qJHURn0i/flXIE zye1t9Vr2OHWvaYNXeIkH9V7wu45OwzvHFYyF3KEjHuFSXcS2SE+PyRvis0R rhhrthqZsIPHt6StpeMOEBqsvT/8IRscfiWsUf/OAVr/O8fIk8MGs6o48laZ A+hIf3lwO50NFDksXfxKHWCiMmixJo4NhKsP32MrdoBj/C8zRd3YoCPmPwXu PAc4VKjfUyzCBsmdFXzelxzAvG+7x98zrNDwNCjd3d4BOCQ3qxYFs8KOlniB L3sdoN6O8tfnOCsYGiU2o90OsLeKN+yPMyu8ZcxQ5DNzAOf8nkujOqzArzdS dEaX5POJLh4ZYQGdRYW2PHEHuDZfxTjoxAKZJ5jE2DrsoUtg950eTWZYqblq dczGHoRMvFaNKMygyMtaTdltD7uCYlyzZZihg/3r8e8W9vDma5mEKzczbIuU 3b7D2B4yMjSSOoaZIJ528FGnhj24KPGda73HBLJ+CzscOO2hU7/Zo16SCQxe KozaVNhBx6F9KiWsjNC94/rsRjk7sLfhf+CyzAC7i7/LhEvaQT36T33tHwNs lpc4Xi5sB2/k9Tda9jFA+27+SD0OO8jqF9PtfMMAhayVYRMTtnCI3may6scA ePdI8alKW6jpKixPeLFW8ejlk8HJQ7bQtZCvXnRwpSL832CZlbgNtPpnZrxZ m6+gxxncac3fDUvn/dr3m01XuNYlfj1+bSco5vh85jMer7i//Sj1xBlTGHvw T5w5ebAi8r/IO6XdCPgqosKOnxis8AKZ36kVCDa18nz7snOwQsez1Ck+B4H/ qnJq7vKvCkZhxen0owim7A+IWNB/VexKTBi4OmMM80tVAhcNBipOUA1xu5Ax MO69wcnf96OC48qdpsMHtoPagN+srktnhdz+kBvPVQxAoqUuklmks+J4+C9d FkEDYIP17M2NHRVwxZTZa3Er9Gd+E/fZ0VHhgihbPRq3QoYDMshRba9Yt0ns gl7wVuCp4jvNN/e14n1wg8yeD/owcbeIcSi5ucJQZX2geYge9Fxlv/TCurli NO/u8A83PWg4c0ToHHtzxfJU2Ldre/TgwX7R9bKnPldU83yRVVbSgyrFxQv5 1U0VjpHvTTe26kI+402+qCP1FR4hn01e6OvCiYo2Sa3MygrXEvlHl3m2wIXJ 2ukEwcqKfOcHNz4t6kDO+rJPI+eh4l7wRw7KiA484kfcO0feVYy/0opiqdGB qDuf+zWz3lQY1Y3Z3IjWAaX3U0lLjMUVXXvt6Evz2tBXhNl7ir0rDv+5m/12 djOIpNHC247bIa+fy0EbhjZDhOIX5HI1BCUwcTgUftsM/6zvVQouX0YJ9WYS XaWb4bHH5XMntG+jXZfOG3Cc3gwWr6KeNdKfomr58dQE1s2w+jpL7WYjoN5n h3mlKVrQkzwm8tu9Eu0w5gk7LaYF705ghm3zlUhpIE97kl0LIhUG2roVq5BY PzevWtsmWL2wIVY+/APisVP+FeNJvO9Nz33FeqTiyMxCu7AR1hZHrbrKmtEb A8/umD8aMD6UUhHD1oKOmksasbRqQG+rka6GXQtqcPbreFCmARWPr8qfGWxB famP73he1oAod525dYKtSE4mOyRNQwPW6iJy3elt6IGUncloyAZYS+dcGxHo Qudml7rllNTB5H3gwxvULtSwvmlfoqA6xI527duR1YWm5PpypdbUgMv48dN0 lW601BT3PKVTDcR+2rvvNP6Orh/9nMOWrAYbNbM+5B7vRUk6Zu/7OdUggMoa aPusFw3BWKn1giq8iPJdtzzbi/bHvs5sH1YFWe87ZWo7+tCQ11v9vbWqcK8s UORsQx8Kd6xzfX1BFZ64idds+vkD/XYd2HGDXxVsZ3ZnsbL1o1UpqyFGRlX4 dzE6sEu1H7kaXR6/8k8FdJ+PrDvv249SQj87cbWpQBlreVjPQj86XXCy+fwt Ffiv0E0tUWAA3XJbYi7UVYGj6Maau84A4heJ11+vpgJcrXVft1IH0E7LeXgr owLWK9rnBjIHUOFNdZV9LCrwxYa1a5vKL+T8veGu7Fdl6J1+kPDbaBD13Lr/ ku+MMkQn+LU+9BhEYyKKUB+gDPJKujInLg6iHG6Njid0ZXBzgIfjrYNoTrmi Z8ZWGfqetdVPHx9C9F4W8VAVEm+VJVSSNITajZ/5RMmS+B9HXMJeDSGeYnHT 58IkXuDvyALTMDJaXjPPZCDxvsycazeH0Vj8+5rAbgpEs9XZQsUwuufwyLDt CwXkb11JP/trGB2QL2Ggf6SAW6OkKsvmEdT4YHsCdxkFfmzQ2slZO4KorKtW oVkUOFc1c6X+7whafZgzanqDAooHytouC/9Gw+v/rMdXKOB+yYLOd/g3UqXw 5nyIpkD/sGuc8OxvFPz9pjPfURIfrdjYKj2KTl7PV3JxJ/ESwyKpO0aRTYSW 8zdXEr8zKFcicRRFPAu44mVPAaberX86ikeRxeVTnqesKZATuqqT2T6K3IOb LN9bkvnzLlbJKv1BfjkWzKOIzG9kw91r9Qdt3llY3biNzP9VxOGO3x80t7B2 7Jc+Bd77dGYcufEH7UvmC9beQvKx3OlXLPuD6iO5jrzUIvmyaOoDfX/QrezH Jb6aJJ/OhsA8tr9ogo26ckidAj/dSxhV7f+i4tnupEElCsQunrIaCfuLqiwu MEcpUkDp+o6kwuy/yDOV47GtPAWq1dg7jlf9RblCZzRd11HAs7JBXnPkL0pt d1DMkaEAy/7rR8f4xtCZtmOb10tTIHdi39MnW8aQVe9mlj5JCphdkJ33dxlD 11YaLTskKDAg9xNpR4+hW8LGxfzEsa8Kzk/ljSGZb9HzMeIkv43vpxcfx5CX fnm7HnH1oI546OQYOmpMF1Uj9oxcOKQvPo7yTvuFHiBmEavIn98+jkSF/Oqa iHOLYsdeu48jTvrnHzFkfjPzXXqnLoyjs3eZbp4izzPQzR+5/fE48mQobCqR osB0j7mD9Zdx5B1TU7eRrIf1xynVQ/Pj6Kf0l6sjshS4PNke+YpvAj1M5GAf lqNA8r+gEaQwgb6UbZDZQOqVNcXnWKszgbiVq98/J/XMnX7wztZiAm1KdJw5 p0KBRzNmah3OE+h6+42XN0n9X8z2Jh85PoFGqS94Fsj+lM9FrI6cmUCUsKvc OZsp8GFe1Dvw2gRiFl+uv6FLgaaFp18WcyYQ13lOn68GFGhb3G0c83ICvfe0 knA3pkDP0mABd+0EivGVYjIypcDg8lnhlM4JlBoy6+lFztfc6qvh3LUJpNKl +vyJAwUYGBwcNIUmUd25QfPP+ynAwTj29qXSJHJm0r5r7kYBCWal5BqrSaRZ 1Ba8xZf0F0vFyl7XSbS6sH/0aQgF1Fhdjn7znUT+MjdULpyhgCH7NaPh5EkU 5MsSbE36x4RjQ4F//iTiuHBp0DiNArs4a4QWSieR28ixgaQ7FDjAvTzE2TOJ Pl941O/xggKn+Y9e36D6D511S5sf6yPnQYB55bnhPxTMPBS8/i8FEgRveW23 /ofOs3gM1S1QIFu4dbt14D/EGqJjHCqiDPkifve/xv5D6vf8151VVIbHolxC h9L+ISn9o2Psm5XhnTge8i3/h8KjTu5NsVGGGokuu7mmf+g9W1bK7cPK0CQZ Wh714x8SMS7Yqu1P7jvpR0nX2KbQVolfGovXlYFBXmJ7se0UqrXrdwzqVQYO hef5hh5TaI8y9hSfVgYBxb2CVSFTiOmZ/4bDnCqgoBQ7+CVjCvmwbX7+m9y/ 6hQ5O9eiKZS8d9JM31oFtJXflA1UTKGfyz+2GNBUwER14trMwBQ62vmq1j9N BXapXV46MzeFnlxVefX0mQo4qCvT2bim0evP3dlvGlTAU8N1m/imafRjXcYu U1ZViNOq/bX15DSKUHV80hatCjlYeN25S9MoOShb9tNtVQDbQ9SPmdMor6r2 cW6FKiz6T9ccfDeNLMuslRiZ1MD3mXzBOeYZdK1PKdzsuhpcrjze91FkBul6 UYNHStWgoLlEQlR5BvUITare71OD/sk9F+9bzqB3qJInSUcdqNonjzUkzqCX KhYDW4bVIcikOkf09gyyjqXaP5fYANfs+bsOPZ1Bpdcilm/t2gD1gXm7J1tm EENROv1f8QYYOjcRYzgwg5TMy+dCRjYAS/K28piZGcTVOXLqloIGGD9v1hCT mEXziVb869I04ECVDO2w2iyajrTgSiO/D8K/eGUXGM4iya6To/PCmlA8tcK7 7eAsYt88l/ghXROUt6iPH86ZRZmJBas/yzeCqVmIyoPns8hyx2zxGvcmIK9Q h/9Vz6IJOCQJBzdBRjD1c+zQLLK4EGneyqIFr2LvcjTNzyIXm5RVDm0taE35 g8W55tD35kuZzW5awPfy3LMHGnMoWJm18HiVFmz40Djyz2gOhaaaf6TPaYHl VwnF7TZzyNTuo7uV5mY4N/P4elPAHNr99TtWvb0Z5nS7gqZK5lDpzZovXre0 QcRC+dH22jnEMnM67emANmhTAwbiOubQ++/vmjs1dcAnlN1JYnkOSdYmT0TV 6cDFePvEI7zzyFv3kd1+mS2Qn5r9oXDdPAoXVf3QHLgF+kp09Ix2zCP1L/7f L2zQJe81kb7x9vNIsi6Jz/KKLkh9q8v/5DGPHvJOeRTM6ILj3GFx9/h5ZDfT 0JD4RQ8C2B/aPEybRxpK1rYfdunDFfHZ89MF82hvxdoBllp9qNVPmI//OI8y 5PoTDrZtBc+62yPmPfNoYf30rHKIATAceN7JMjmPnt5nb/SRNYSsPzUfq5gX 0Ou0e/zLnwzBILKz/JzYAlKv4Sh7lbgN2vjHinaoLSCff9kRmfu2Q+BdxtsM 2xdQQNCtZ+82GkFhterZyCMLiPd8lBdwIrCgbg80Cl5ANqlTLts5MPwcsvFY jl9AY5RkmtgNDNEnPRzLbi4gx6iRi64aO0CGO8w84tECEoWucvFPO6A065Ke QcUCSpa5YeQbaQKOG2+pzDcvIIf2rOW8baaQaPeBM3RuAf3tj6iO+GUG6j/b F7dwLSIV35OzNl/NoSb4z+iUzCIK2H84LbjDAtzZGL4Xb1pErQEzD1umdsJq mnBTgMkiul5cr0VXtoIMNZUKLadFxH3VxEwzaBfolxk+HfdaRHbmvfoC3bvB v+fI9ROJi+gO0ym+8xw2wOMfEqNxZxEh2UUDLi9bKGC8GDxavIgGOJTOZO63 gx9KT6ne7YvoQHzRVN0xB7A/vipFW7+Efn0Sr85e3Qdjy4I8SnpL6MGXw7XW Kvvh8hXKSr/lEmo8dXqpycoFqp/t6XXzXUJ8gUupmX6u4Gbq9lnu7BL6Xn2+ e7fvQVhuDarsSSbxWtmXHh08BLrzGfdcXy+hz7GOhkFsbtBy8XGKdMMSqnmz +/wNuhv4Sr+P6+xZQpqh+666VLgBV9HX0JuTS4jXmXeztuARyDce8XJmWUbT 8n1G6a5HwOTzsrO4+DJyKWRL4Mk5Ar1HBHa1qS2jZijx5+0/AhJx+hqONsuo L0Eu77qDO7wQ2y0r7L6Masr3xf+LcwfbgkN8LcHL6N6s8q2UF+7wxyBw7dr5 ZfTxDD9fc687XPwYN2GTsYwKE6buzrF7gPLBmz/4ipaR5Zb2fbaaHvB+7FFL Y8UyuvTt7rK0rQcsCra+2P1rGYn3TCqOX/GA1HtDeVzzy4j5NmV2/0MP0NFd Sq3jWkESCRExax88wMdZ8eROrRVUaMDy48qsB3D81j3GZrpC+jXw/mseT8g9 ZXXgg9MK4g47+v2ugid8v+VvZHpqBQ28mkjhsfSEK2jL8vuEFeRc49ee4uwJ uG/ujcmtFbSqcKxr71FPyFGI2mpSuYL8zL8/vhLnCQ7vTeYqW1bQVU/jWY1k T2DxYCvZMbCCatmPKm684wn03ESdHeyr6Cdu/x1V6gni5nb/QGIVicizsPVX eULtL5FnWH0V1SWuV6lv8gR1layN2HoVDUxsybD86Une7wvVUPIqSqfrfLjP ToPbu3yH3+WSeEbvtiF+GtiObr5vXLKKRrnoeZ3iNCjWeK1k3LGKonevbBhW poFH4+mfb3+vouQMGQmujTQQ8cU5RsurKE/TTPfvFhqEPflPzkhuDTHt1GFn NqGBqu3lnnKtNZQSLWG5zZIGnRN7s7ebrKEvFyw60F4abNduk9pOW0NmSc7m r/bTgOHlgOi2h2to1aXU86YvDZ45FbS+KV9D3utjj/gF0cB99niyYdMaaqrh MFYIp0G1/pSA4eQaghaZ8HVnaWD2nSE+S5oBl9V9/XcviQZZRe40VyUGHCzf lhh5gwYzZ6rNZDQZsMnwrjXjmzTIX3eBOcuYAcuv7zALuUMDDjf+s5lHGLDG lNj0pyIauGkFuB04xoA/CPMb/ntKg9cMX5B0EANOqlRdZXhBg2N3U1czYhnw a4pW/uBrGjT0y57OuM+APw+cO/qzmgZKz6MOuDxlwI+W3jZE/EeDMzE/DKVe M2Cvxo9WzPU02KiUt3CznnhQ2WekiQZJNI2wm38ZMJ+H2QGxdhrE2/420Jxl wHvat37X76RBxLaCZVhlwGGevtp7u2ngKah0bpifEa/clcl26aOB3lvpRH1t Rrxs3l2+OESDDQUdNh8NGTHTLh+DjyM0kE9OEzpsyohTlVsar4/SgNNbOD3e kREfXIjZzDFOg24R7ntfQxmxTuYryeszNPi8VkvzjmLEWuvNMxTmaPDhd7zq ynlG7PMQBh/M0+AxMD1WusmIgz+EZeUt0eCsz2JpUBkj3tHTor+XkQ7K1SNN ggxM2M9UuyuOmw7ST+4n5XEwYS8ZcdaXPHQQyKA5Gggy4TMBPbt7eemw4Pej w02RCa+46dyhCNChQbpj4IkZEzb1iLU8LUKHgKDaReuLTNhKZf0xugwd6Ifi 3/5IYsIptMfMDrJ0cLEyiw7JYMLtfn1q29fRwUwOWLMfMuHw4z88WOTpIPbx lcCfRiYcHbP/mO96OpQr3le+JMSMk4oELUrU6OC/t+5DuzQzLuw5qxSjTgel iFFPFQozLgqa5bXeQIfE5k33qvWZ8QZhMG7XoMOh6FK5NVdm/CqH8qhxEx0Y e+okgu8z4x7DbbpYlw4lnH9evX/KjJtMf6sMEB/T5dsn+IYZhz80mYzTo0NL gv2Nxw3M2FbusVaVPh1yt3UJjkwy401mJwMphnSwuPmH69B2FpycXtp4zZgO i9V8hY/MWXDLifLTYogOjye0rJb2suAa+eaEDGJxy5Dz6UdYcNp9jz/ZmA7D syvMX+JZ8EVtI/p1EzpcduRf2dnMgisSp0r1LeiAozdnpXay4F/RPqfziacf Omz79ZMFMxfNMorspIMrc/rJc7Ms+GWqg9co8cZi+dlyaVZsQ9dQTLCiw2d+ 7fHNdFb8h+21yc09dOA31Zjp82XF3daL0hPEe0OVl66GsWLR3nkZC2s6fOyW Yh+7wIo1C8RyxolrHjDLFT5kxTc+7OY0sKFDmenXvYqTrHjl4oP8+3ZkvaGf HJsXWHGFwx+Lf8RbC+tcopnY8MIfRoPt9qS+Au/oPcJs+NGuh9JNxE+/50dm 6LHhNXduid8OdMgPC38sdJoN2xv7lrJQ6fCrMPBFZSwb3ubeGGBOrNTj88Y/ kRhJZMcR3zU7UtN0iw0Hfzpiy7KPDlmCu3ouVbLhEsuvzkvESQ+l+ZjZ2XFG ibtj8346nO59d2IqiR07pjZ8Vz5IhwgHWduDmez4DsVlxJU4/L9T2v/lsuNl bplz14lDnmydy3jFjpuvFbotE/tGFUebfGfHnb9qZ+sP0eGIXH5ykioHHthg m+3oRvb/cOLrTRUcuD08OUPBg5znL6OZN2s5sK7slpTdxKY7d0Uyt3BgT4ev RiHEeBO76bcBDtziFp77H7HBWnRDJBcnlvmyue2oJx00bgf3Njpx4lr/wpPZ NDoI9h5g9fnDiQcpTI9aveiQ4XJ9r94MJ3apleibIlZsq01jWOXEd4eyfwgd pcOWRl31G/xcOEW8fK8tMbWM3+adNhfeyBj+vZY4K60qXeAkF97+crP6M286 uf83aLxk5cbfizo1jhynw7OPR0Ki+Lix35YrrRHEhjvT31mJc+NTnE+dUoh3 G7Pa9ahyY06ViF81xL4avSHse7ixwFi6qboPHZ5zJFfsv86NR8K/Gv4mNq5c tF9dx4PbXltM2/rSwWNfYlSWCg/2X6gcphFf+Cv3yFCLBzuYIoggbpE0Zw3b wYOlZ4Qlc4lpgVdfjXvwYN2a1rAZ4oT1SjI/Cnhw+JmLosl+dOiIs/5Vpc2L U6Q1Jcr86bAq3Sfovo0Xvxu6WN9ArFgcaMxgxouPCOfTeoh9etLStjvxYmpv KZUxgA4M+v1WL8N48a6VCFULYuXh0Mf55bw4sf134Ufi4F13wi5a8OH6PWXr /gukg7NCWnS/DR92Bavgb8RG84kXt+3nwweULj4fImbLP5X59zgfdvN7Ns4e RId0xn0Vdkl82F/0hftO4vJSXnapbj786Vqz/XtiFpVTqYUB/Lg6VNziQTC5 D1YCbjOf4seDAp0ir4gbW48WuMby4+kNfs3VxKnnqG/40vhx3roYkT5i1Z7N PYHl/Fj/rOcH0RDST7umr2czC2DT8oGRM8T1jA87aXsFcA8tYXJHKB2YAq5f f28vgM8sTv7aQ2zQd3KX3D4BfH7EpHEfccE7yzfthwXwb8bx4BPE8acGb+4O EMB1293V04l3zCjs35wigHfs7d0+Slw6nP5tuUMAmwlFBF0Io8PEvuir+3sE MLso02ASscp/XjtL+gXwE+tI60zi1Dy9V36jJF9w4lIRcbB7a2r/sgAe7E/7 2kK8qZufWisniL0ZMhOlwsl6PsW3JtME8XmPd8dyiI0O31m0PiaINfo/mz0k bh17Lc/hJ4gTnnQJvyBm5vvrczpcEHcliyV9IHbb48BKuyyIf155zzlMLFUn p6f3TBDv9XrIsOEkHa68L01rXxbEAt4VtAfEFPuWt9cZhfDqFHXxKXH5j9Gf e9iEcJ9jdlwp8SiDnFYlvxB2a/eK/o/YEsXVPlAUwoJBlhy/iJnK7RYiLIUw B/Pt4+si6BD28reLbIoQ7pLS+XyJ2NW+OLAyXQgXnf2hnURsMn7yEi2bjN8f T0wj5lHjfFOUL4TjXtpp5hLnZKlIGr8Wwt7u+kJviRtiPL8d6hHCKq1PT/8l VrTvcbijKozZjk8IWZ2iA/t43nEzTWFcdMw0eS/xn8snYoY3C2MuH0FeR+JX H5aLtbYJ4/3Fxn8PEe8xkBaqtBbGvSlv3YKJw+SdP/8IFMYpu9dL3yJuGGve s/6tMFZllBf6Sxx6lTU9rFIYd+iaRE0SK2gZ/Pz4QRj/aI4fmvnfeMCdk8FN wljOOfHBKrH8tG/+h15hXFyrOs1/muz3AjfDUSYRXJm+p2AzsQyLxfNHO0Vw bNzVpwHENbknVxn2iOBQCb2EEOIA8yIrJ1sRLHzqnsfJ/43Hi/StOItgltxf rGeJ/Tl/8tgcE8F8c5ckrhFX80XTJxNEcF6ve0QR8QnJN5J6LSL4t3iozS/i 8E65L0NtIjiuTHNmmPhcZlzCzS4R/F9NSuof4lRZu7XlAeIfcQ1TxKAwPFA1 J4Lp1FhWpjN0EFIXe2onK4rX7T/0VJa41DDQ4sRRURwyfovbnvj90re1dSdE ce6bHi0n4oZyo9efA0Qxl8dRe2fiH8acGltOiWI2vuOXDhFzmd4RXEoUxWvD BU3HiA/ubuq+8FwUZ1Q3PjxHzOSqHpS7KoqpA31fnxC3yC8fZmMWw7qNFw8V E9/91bjnKLsYfhrgPfCCGPsFKGsIiOFHezuGXhNHnivteK4ghhm3NTdWES8W WOAqMzGsHflB4hvxvxl33v5LYrhJZEPF0v+e/82WRdOrYnjrI+/pFeKkKLah vGQxLJu8TYUhkg5anIXgnSWGNbly41iIfWUmgyaLxDA/fwuFl/i3SVQnQ7MY DtX+MyNL/PNq5n05cXG8/WjToBExg7t0/HFpccz2/L86RLxuS6bnKzlxbJL2 unAHsUt7hoKNqjgu/HeVbk78WT4jM9JAHDt3m9bsIS5/ln71+wFxXDd4X+UA ceqXG2GZd8Txieb+6FDiF3mi1KFccayox6wSTtwcdmOLzgNxLL128ONJYh6Z G5P1z8h8HvV8Z4jPeaYcX3wvjuPin0fHEPvNXD+8/5c4HmDyFrpGbCl+bae4 ugR+zs62eJ+4htMkBTZK4M4wi0sPiE2Xp/q8dSRwy90XEg+JjX/siyjfLoFr 8xS1HhPrPJQrOmIjgUuCoq1e/G+96InQo2AJfH27sCoQz9CbvuMKCSxmkZ7T Rhy4P1r9d5UEnsVnl78RT+zWDkuulcBpod8cO/5XX61UgcFmCbxnpIWhm7hv 8aDp5QEJzNS21eIHccOVvwVfOSUx43q7C6PEOSU8wcccJTGfQP3MKvHAI/Xp KmdJnPirkYchitzP9yyDZQ9KYnpujiIj8aOrscGfaZL4Gkv1LmbiV0eXg/XC JHExD1ciO3GD1J8QpgxJ/PR2eSc/8Uzkx7CMXkncwY/vyRFvDRmZm/opiVVb P6TKE0ccZw+3HpbENAXTiwrEDM6m4QyTkli9VfX4emKuzWXhdCYpPFBdoahC vO5n4UltihQe1RR030hsufPSqfpjUthxzxPV7cRVj0tO5flJYYfKX6JGxMZi P09FB0thz+plRmNinV/bTutFSmHRweY29L/5Yv6ezkmSwo8cjYNMiafe2UZG lErhd/6W4buIb+mJn1Vnk8Y/9wmX7yOWvGV6lpVbGpvp9Z13Jk5h9T/bxy+N hdRL7PcTX2ytPZsqKY2tVs/+ciEODow4x6QpjRcqXq8dJLZ6/D2m00EaK+0p YPckrhblin3pLI3HGq5W/8/GZ/Rirx2UxnJB16NpxFv2XI218JLG1rF/Z+j/ e97fOK44Qhr7gESbN/FNuxNxiVHS+ODpucvHiEVe34w7GiuNZwcW8HFizgv/ 4tZdkca7h04U+BDHjq+LX7gujQOTf7icIF6l7o5vTZPGMoJneHyJT74Li3+S JY0P0He8/Z/////RmC190wk/4v8DFCbsrQ== "]]}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesOrigin->NCache[{-Log[1000], 0}, {-6.907755278982137, 0}], CoordinatesToolOptions:>{"DisplayFunction" -> ({ Exp[ Part[#, 1]], Part[#, 2]}& ), "CopiedValueFunction" -> ({ Exp[ Part[#, 1]], Part[#, 2]}& )}, FrameTicks->{{Automatic, Automatic}, {{{-6.907755278982137, FormBox["0.001`", TraditionalForm]}, {-4.605170185988091, FormBox["0.01`", TraditionalForm]}, {-2.3025850929940455`, FormBox["0.1`", TraditionalForm]}, {0, FormBox["1", TraditionalForm]}, {2.302585092994046, FormBox["10", TraditionalForm]}, {4.605170185988092, FormBox["100", TraditionalForm]}, {6.907755278982137, FormBox["1000", TraditionalForm]}, {-6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.809142990314028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.521460917862246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.115995809754082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.961845129926823, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.8283137373023015`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.710530701645918, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.506557897319982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.2188758248682006`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.8134107167600364`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.659260036932778, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.5257286443082556`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.4079456086518722`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.203972804325936, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.916290731874155, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.5108256237659905, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.3566749439387323, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.2231435513142097, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.10536051565782628`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.0986122886681098`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9459101490553132`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.248495242049359, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.551080335043404, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.684611727667927, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.802394763324311, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, {{-6.907755278982137, FormBox["\"\"", TraditionalForm]}, {-4.605170185988091, FormBox["\"\"", TraditionalForm]}, {-2.3025850929940455`, FormBox["\"\"", TraditionalForm]}, {0, FormBox["\"\"", TraditionalForm]}, {2.302585092994046, FormBox["\"\"", TraditionalForm]}, {4.605170185988092, FormBox["\"\"", TraditionalForm]}, {6.907755278982137, FormBox["\"\"", TraditionalForm]}, {-6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.809142990314028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.521460917862246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.115995809754082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.961845129926823, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.8283137373023015`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.710530701645918, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.506557897319982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.2188758248682006`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.8134107167600364`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.659260036932778, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.5257286443082556`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.4079456086518722`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.203972804325936, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.916290731874155, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.5108256237659905, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.3566749439387323, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.2231435513142097, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.10536051565782628`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.0986122886681098`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9459101490553132`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.248495242049359, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.551080335043404, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.684611727667927, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.802394763324311, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}}, GridLines->{None, None}, Method->{}, PlotRange->NCache[{{-Log[1000], Log[1000]}, {-179.98235186858818`, 0.}}, {{-6.907755278982137, 6.907755278982137}, {-179.98235186858818`, 0.}}], PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], Scaled[0.02]}, Ticks->{{{-6.907755278982137, FormBox["0.001`", TraditionalForm]}, {-4.605170185988091, FormBox["0.01`", TraditionalForm]}, {-2.3025850929940455`, FormBox["0.1`", TraditionalForm]}, {0, FormBox["1", TraditionalForm]}, {2.302585092994046, FormBox["10", TraditionalForm]}, {4.605170185988092, FormBox["100", TraditionalForm]}, {6.907755278982137, FormBox["1000", TraditionalForm]}, {-6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.809142990314028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.521460917862246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.115995809754082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.961845129926823, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.8283137373023015`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.710530701645918, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.506557897319982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.2188758248682006`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.8134107167600364`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.659260036932778, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.5257286443082556`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.4079456086518722`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.203972804325936, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.916290731874155, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.5108256237659905, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.3566749439387323, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.2231435513142097, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.10536051565782628`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.0986122886681098`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9459101490553132`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.248495242049359, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.551080335043404, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.684611727667927, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.802394763324311, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, Automatic}], {189., -355.98757751993935`}, ImageScaled[{0.5, 0.5}], {360., 222.4922359499621}]}, {}}, ContentSelectable->True, PlotRangePadding->{6, 5}]], "Output", CellChangeTimes->{{3.5020885068623705`*^9, 3.5020885490647845`*^9}, { 3.5020886000647016`*^9, 3.502088611786372*^9}, {3.5020888639637957`*^9, 3.50208886945811*^9}, 3.5023557057203856`*^9}] }, Open ]], Cell["\:0421\:0430\:043c\:043e\:043b\:0435\:0442 c \:0434\:0435\:043c\:043f\ \:0444\:0435\:0440\:043e\:043c", "Text", CellChangeTimes->{{3.5020882922310944`*^9, 3.502088300392561*^9}, { 3.5020886351257067`*^9, 3.5020886400609894`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"MatrixForm", "[", RowBox[{"\[Omega]z", "=", RowBox[{"{", RowBox[{ RowBox[{"s", "+", "c1", "+", FractionBox[ RowBox[{"c3", " ", "\[Mu]", " ", "Tb", " ", "s"}], RowBox[{ RowBox[{"Tb", " ", "s"}], "+", "1"}]]}], ",", RowBox[{"-", "1"}], ",", RowBox[{"-", "1"}]}], "}"}]}], "]"}]], "Input", CellChangeTimes->{{3.502086292714729*^9, 3.5020863559183435`*^9}, { 3.5020863960746403`*^9, 3.5020864160587835`*^9}, 3.502088337500684*^9, { 3.502088706247775*^9, 3.502088713481189*^9}, {3.5020887650171366`*^9, 3.5020887994731073`*^9}, {3.5020890319254026`*^9, 3.502089046876258*^9}}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", TagBox[GridBox[{ { RowBox[{"0.233`", "\[InvisibleSpace]", "+", "s", "+", FractionBox[ RowBox[{"34.2254750325182`", " ", "s"}], RowBox[{"1", "+", RowBox[{"3.3333333333333335`", " ", "s"}]}]]}]}, { RowBox[{"-", "1"}]}, { RowBox[{"-", "1"}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.5599999999999999]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], Column], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{{3.5020864083853445`*^9, 3.502086416956835*^9}, 3.502088339640806*^9, 3.5020887156523128`*^9, {3.5020887686993465`*^9, 3.5020887998931313`*^9}, 3.5020890485983562`*^9, 3.5023557058003893`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"MatrixForm", "[", RowBox[{"m1", "=", RowBox[{"Transpose", "[", RowBox[{"{", RowBox[{"\[Omega]z", ",", "\[Alpha]", ",", "\[Theta]"}], "}"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.5020872461072598`*^9, 3.5020872800412006`*^9}, { 3.5020873135241156`*^9, 3.502087319207441*^9}}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ { RowBox[{"0.233`", "\[InvisibleSpace]", "+", "s", "+", FractionBox[ RowBox[{"34.2254750325182`", " ", "s"}], RowBox[{"1", "+", RowBox[{"3.3333333333333335`", " ", "s"}]}]]}], RowBox[{"29.5`", "\[InvisibleSpace]", "+", RowBox[{"0.075`", " ", "s"}]}], "0"}, { RowBox[{"-", "1"}], RowBox[{"0.3`", "\[InvisibleSpace]", "+", "s"}], "0"}, { RowBox[{"-", "1"}], "0", "s"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{{3.5020872724027634`*^9, 3.502087280702238*^9}, 3.5020873204825134`*^9, 3.502088395226986*^9, 3.5020887503732986`*^9, 3.502088801070198*^9, 3.5020890551047287`*^9, 3.5023557058303914`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"MatrixForm", "[", RowBox[{"m2", "=", RowBox[{"Transpose", "[", RowBox[{"{", RowBox[{"\[Omega]z", ",", "\[Alpha]", ",", "\[Delta]v"}], "}"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.5020873377695026`*^9, 3.502087345456942*^9}}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ { RowBox[{"0.233`", "\[InvisibleSpace]", "+", "s", "+", FractionBox[ RowBox[{"34.2254750325182`", " ", "s"}], RowBox[{"1", "+", RowBox[{"3.3333333333333335`", " ", "s"}]}]]}], RowBox[{"29.5`", "\[InvisibleSpace]", "+", RowBox[{"0.075`", " ", "s"}]}], "4.23`"}, { RowBox[{"-", "1"}], RowBox[{"0.3`", "\[InvisibleSpace]", "+", "s"}], "0"}, { RowBox[{"-", "1"}], "0", "0"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{3.50208734629399*^9, 3.502088397834135*^9, 3.502088752352412*^9, 3.5020888019992514`*^9, 3.502089056572812*^9, 3.5023557058603935`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"W", "=", RowBox[{"Simplify", "[", FractionBox[ RowBox[{"Det", "[", "m2", "]"}], RowBox[{"Det", "[", "m1", "]"}]], "]"}]}]], "Input", CellChangeTimes->{{3.502087352433341*^9, 3.502087360735816*^9}, { 3.502087393166671*^9, 3.502087413468832*^9}, {3.5020890729387484`*^9, 3.5020890763319426`*^9}}], Cell[BoxData[ FractionBox[ RowBox[{"0.38070000000000004`", "\[InvisibleSpace]", "+", RowBox[{"2.5380000000000003`", " ", "s"}], "+", RowBox[{"4.23`", " ", SuperscriptBox["s", "2"]}]}], RowBox[{ RowBox[{"8.870969999999996`", " ", "s"}], "+", RowBox[{"32.83259275292662`", " ", SuperscriptBox["s", "2"]}], "+", RowBox[{"11.175642509755455`", " ", SuperscriptBox["s", "3"]}], "+", SuperscriptBox["s", "4"]}]]], "Output", CellChangeTimes->{{3.5020873971628995`*^9, 3.502087414114869*^9}, 3.50208840089631*^9, 3.502088756288637*^9, 3.50208880302331*^9, { 3.502089057866886*^9, 3.5020890797931404`*^9}, 3.5023557059213963`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Step", "[", RowBox[{"W", ",", "10"}], "]"}]], "Input", CellChangeTimes->{{3.502088411829935*^9, 3.50208842012941*^9}}], Cell[BoxData[ GraphicsBox[{{}, {}, {Hue[0.67, 0.6, 0.6], LineBox[CompressedData[" 1:eJwVjnk4FPgDh0eqXzkKtZScjSjJdmy7ssvnW1OrhBXZSiokI6RNSNImRCQ3 ySaRI/ddrgbjvnNP7mlyhHIOuX+77/O8z/vvK2t6U+/aGgqFEvyv/zXib9P1 B8yeqFP+o05FraxFRuuczHVQivdxU17PqK9WMNxkZO6C0i/WEGu5FZsC36bz sVxBqTuo2psrj4jip9LrZLxAEZmKObh4CErjZr6rdD9Qzidc2MFRR8+mlytL HYGgLK9K0im/Qy5u488LiyGgSMlE5LzShrWa/Y056edwafN/GS2nj6zW/pgZ 2gtQvt229v1+DgtWWt2T9EhQeo5eZWhcwiuebq+5E1GgcPTN5jxMcLw+YNds RzTIQGbqvddmGA7TKJm5HgPKVQ/ja3N0+JgtG00vxoLo3R/Ld7FCy6JF8IR0 Aop5heJ4Qm/BoVJq/3hGIowbQgRkY29DPKi19istGa/K7ogcq7WHqSLhHaWn /fsT95foBSc4JvPnTXVkYmLbZj2hg67QDBxcP/UqC7oXYhMkvd0g4VhydvJ6 NoxXSrRdRtxRTLszMb6YA3JEwK+f6Yn/dX1S+CqdBxWu/sH6qqdgFb+3HxvO A+VmbO4hQz8kxoWVjmbkw5iPYpHu6A8dW50rI7RCaP1hOTcnFojQjfmhQ/Qi bOX39fv1dghEXlStmexgQpdeKdvz8AWiaiJvjUpXg2VBD7+UEIuZsBzFPp9q mPPt33lobxx+p9dymuerMfzhE3UxOQ5jvHMG+S01EM2M1iLp8VBR01H18qxD ZvIlw+LsBHxIW1qjMN4IFkdhn09aCh7UKGkeuNKC+F8ks36KycSbjHfySSEt SJKNum/Vm4nmsGO8u+pa4Dxjd1x7Wxbk6OcLtx1pxYmbP88KPslCDa+7MmVL G+zk/QKtrbMhqtYl0ljRjtrUN4nCUm+RmubVZa3ciVZlwbQx1TyMiIz4aJp0 gqn0edHdPA8KDprqu4M7sWl0B09dQB5e/cYfxZnvxIgPnzh9KA+B1T7mhuVd CLeSf8XyzYcDx29Sw6gHNtF/tow1FCDz94noXX490BXPyg7kFmA8QfcsL7MH jFQNk7EdhbD4S/gdQ6EXPk4rhYX0QhguBzofnu6FnKD2Hz2LhYjkr3UTPtGP 9ZImGQ9FGVBXu2fkcrkfxl1tL8NUGOi22Xt4/E4/DJf+DLA0ZGBb85PBusR+ OHBPOR+NYCAgTOvUYyE2XDfz6FZLF8FtV8Om1S42Hki9GDgvUAw6mp6P2XIQ dSZdqfBbMSjRs/ldTziwy+Hnz1osRthaie6aGA5OOjV6+W8oQVW1uVRCOwdJ aZPnKDtLsPvsUvQ11c/I1U/PydMvwbCFQnIvzwBozyNfVGSWwDLwPuOD/yC8 zUdmm42ZWMON7itKGISo39/5AlZMhJ+roqQxB/E9RH3TT/ZM1EhsoT2dGYTN 2Pt9Wl5M7I1/U3nq/BC8B64lx6czMVbQ8oEpPYw7PJbWh5eYsBnYw8lO/YLa 9Y1mg56l6L/8cUNJ9RdE34yO6PUvhT7rsXL95y+4sfw5vvJ5KVRqh+4OiI+A 5XlpyjqpFLwZsUKiniPo+DTru7GhFGHOsup3rozi+neB+kyhMpRs2f78iNBX SFYPfRv1KQOfrLtCn8oEQmIoOmUW5aj6LeDHv09MIGuEFp9rUw6P8y9/kdSb wN0Jy4vxduVY45+rcdFqAk1yo1J2LuVYWBmjd0RMIPHUD0L1z8ox2m3wpnHN JNSc9FuelJejLkxhT3HdJBJFdKjJkhXwFapVjDKehteZXysul1bAtOtsEW/d LPJpvHLaglW4Ve5uelNhAWIiJ4Lm1KuR8ZeA/rZTy3Dz7rwwZFCDqHtWI/vP UciZ4LRdrIe1cI1cOjMzxkMcc0Mfz4bVgdLSTwqdeMk9vmWtk4n1kLczdzyr uI48WLm+K6e5AZ+5z/7kf7+efHqa+JEMNUJzwPJ+4K0NpKZ97JiL1wfofPbf KyXFR5r2iBdESTRhpNTUpSqFn4wEfIlixTZBWbhdknZFkGx8yDyfpNoMPnBN uqc3kQPlW/KDypuh8dVwbqeBEHno7rksZtQCFtOMx1BJmIh/O53aO96CnMdl l2W4wiTmzrBwwd1WmK+z729oECETx+UMD21uw1XbezkC4VvIZPIjg5LwNvxI 39ugZbKVXBk4WhRAbUejiBK//ZEfiOftt4Ir79pRkOr6jxKvKDkwZbjZ5VgH 7vEo6tb1iJLVglxuBKsDfN1OJ22yxQjXy05zxYqFgTjZ4EjnbeTFO2M9Oy4L wbu3r80z2E6mdNfDw/sj/MPNK01kxEmHdndvyg+dMAy+1CAwJE40jIS+ir3s xPfjsfORjB0ktmO5T/JgFzgDxxyZnhJk87sdHkcKuxCtdmBHvYkkseOdFpo8 042UR/bC9H1SZDhrQYfR0w1Pg6uneblSZKuD8WK9eQ8Od0cleNZLE5XYBz53 F3sQtueflPrTMsRWpfGDqkcvHhQ/DTudJ0OiVVjzzyT6oL3DILZGTpZ4ayLg l/Q+HLWpvCjsJUuOGo/emJXoR6SEqVwdV5YUNAWti6T3Q640PlTn4k4C+1YH vZR++O9jKjYzdpII2ePS8ZP9MJ9e21StSCWO7kL51b+yYZoxJePlRyVG2+2V 51zYsHbVX9IMoBJada6Ikisb9vrZHQJBVLL77tKssRsbj7n2vv6hVDLDciuq ecRG6pH5xWcRVOITFqj70puN+ZLV9rgkKikQS7c9EcyGf7PA07JKKhEXHX0b FM9G+OsbFh7VVEKpUP6n6g0br+0aaCdrqWTQ3vbBcgIbb0X9F2obqCSzbV6D nsxGt+EWi5Y2KjkVsuGjagYbCpzttE+cf/+3yi+y89nYn+0kFTNAJZfLrveJ FrKh+qhr/toQlRy3Syk9/Z4NLYWI9C8jVCLU+pNPThEbtlYyUpOTVBIfRJP0 KmPD+beH85nTVOJL8+RhlLPxSPBTqx2XSm5P1wxMVbARlvb6yffvVAJ9vVSj ajaiXdbS8xeoRJ43NDCgho2kM9eOOS9RCX/WR4eKWjayd1ZIqq9QyaSp5MXF OjYY0/Lzq6tU0iFigv0NbPwfxyCWHw== "]]}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesOrigin->{0, 0}, PlotRange->{{0, 10}, {0., 0.5564194906115415}}, PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], Scaled[0.02]}]], "Output", CellChangeTimes->{3.5020884331011515`*^9, 3.502088806777525*^9, 3.502089089956722*^9, 3.5023557069014525`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"BodePlot", "[", RowBox[{"W", ",", RowBox[{"-", "3"}], ",", "3"}], "]"}]], "Input", CellChangeTimes->{{3.502088495859741*^9, 3.5020886108253174`*^9}, { 3.502088823899504*^9, 3.5020888778095875`*^9}}], Cell[BoxData[ GraphicsBox[{{}, {InsetBox[ GraphicsBox[{{}, {}, {Hue[0.67, 0.6, 0.6], LineBox[CompressedData[" 1:eJwtl3k01P37xm2TrURkMKUhaayzGLLl/VYUWbI9ZITQLtVTSouosSQRIoWi NA9aFaIUn1uWKHoKT2WJSFNR1omxf/3O+f1xn/u8/rjuc65zn3Odc2kEHnLb JSYiIlK/MP+3BWt4sfG3KJBrjIfPuGOc57iqzugGBU5ktk28csZ429FM0udr FPgVempeYQvGFZAcTU+mQMebZrk8jHGszxluawQF0t53G7w1wFg1xTNCfTsF dhudClGXwthqRup4kTIFPAb9+WdOIny+OWRX+0U1CFfyMBdxtMJr9hSWvfVT hZzkqHXOlRY4TGbYsNRWBfj0GtKIjxm25Tww12CRwbNs22AKaR1Wv9z7jCGp DOKPX9nHhLPxvU/KfkbDSmBlNW7Tps7CNpLVx9qrFEHk6Bdnw5V0vK13QIOU sQwucRPfSC/XxdRGxTHNaAVYdas9mbZzDRbcKF73zUsetGQehThupeLJGd4G 40g5mDRYsVNZm4xFyZ1W+d6LQW72IS23XhZTRcU1A0kykJGhYi1hMoTypWhb xdskYfiP26a3nn8I2y+WQb/PkMC844NLuZ8cdMg73OwyEIeU5L+zLNNUoM3P a20pSRTeSSrtVz1BhY7JPN0HvrPEiH9IVMMdLSh9s3uHseMs8SXh1kz6Uy24 fEM7vcJ8lmi9GhLg+0oLtljnib4lzxIFo6VvWvu0oDzun0+D72eIP+e62CGr 1kAmmRfL2DRD8FTRsGXqGthmfKu32HCa0OT+4a48pg2th7Myy+eFxOu/69es ptKAUXWZ3PRLSDge8D06Y0CDRIX4tO42IfHsYPaaNxY02FR04pJEiZAYfGJ4 1c6LBs/G/uI67xUSp76GNL5MpEH2cfn9ve8miAdHaGUPhDTYGx5jJpM7Ttzf I22qX6cDNY3hpSuSxolcls2n2806oLEy1IgePk443JERl+/WgfaKQAMPz3Ei OVOir3ZCB5zmkUa2zDhR19fgmE/TBRZ3Sop19A/hl/Hsu2WcLkyfP/TJ20ZA KEr52mVZ6QH19sNLNUwB8c2lJXmfvR7YVP62oa8SEDW2SQf0PfQgQRD8WGJq jEjzs25P2qcH6gF74wsLxwip4dTwplQ9wOYBliTKGLHce+Dpar4exP5yu/lo ZIRIVC8rtebqw13Jy56U7hGCH52jcvuiPvyr+X5xbOMI0cnro0+m6YOK99aT PvkjhN+zwItR+fpwp9bBbZHvCOFR7eil0KgPjdk2Etvrhwmzj9dLlBQNQDP3 wDs5qyFi9ZH7YZ3XDMC6PP5WIGWIeHlmSuB+0wB2NBccKRUOEtQIb72X+QaQ I/ZNya94kNB9NN3GLTWAFUG+3g9og8TmVMPeKy0GsFzLuddB8TeRcNZ/WnKx IUjl0QVxP/oJN3uetsNxQ1hb6VTbWdtPdHLTTPLCDWHTh+B0xu1+YqdbfpuQ awgxiwpMP/n2E6ZT88LoJEMQ20M9s7blJ8FR3R5hVmAI02sVFtVV/CACog70 qn0yhME7o2TxVD6R7qdSM82kgxwRGRYcwiey3wWINq2jA7118ceWzXyiOG7L rSvr6XB4TjudN/ONUNsfYrbEng5jbj5Km3Z/I+JnBqhX/ekgnK6Wv2DWRyyP 4d6mXqSDqPMV6aVfeogdh3SdgzrpoBmkuS+svIf42l6iY9ZDhw0nCuu703qI sYnj85J8OkTnNpx/ZN9DvN798G3yEB0WTcyS3Iq/EJrBpqY0UQYo4yYJ3SXd BFWbKLdXZIBO36FxY047cWGm/8RGYwaoNDdEiCu1E/VWlLu0dQxYBKsl3ze1 EcpTl87LmjGgN+sj+YB1GyGIPeX72pIBme7ILJf2iQgFGQUDGwYsrpYLl5v4 j9gvho9ddGPA8K0Hot9T3xP1ws86LSEMCCE+qDKyqohnAZOvanMYMPfsuk5G EyCtwO2uupMM6EodVOoPrEKmWpMz96cYUBmCRSyEVWgZN1yHMcOACI2+D52a 1Yhfa6ZhOr+gj9OLpp6oRRsLnV22kpgw51Xela/5GjlNFX++qcCE+akB+47n 75GPROKsmB4Thr6nEVGLmlFDZXDGbX0mdLeuN9Z3bUZFlM03bA2ZQDxMop7h N6OT/01OJTKZEBloNKGu0IqOW1zrYZgu3Gs4xQvc/QE9sNsvWWe7wNek53/K dyCuY4PlzkAmbHh55N4Vzw4klqfaS93JhOiBDi/r6x1o2msms3sXE2SsHj66 trYTFXTZBQbtY4LyV7fAzVafUdeeZvGYw0wwNLheywvuRkXke/EmkUwo3EGu o3/tQVPoZ2xUNhNc/jhcJy3qRZUpCqLJN5kweuHskQ5aL3IKKz6Uk8sE4+Kf 6ucP9iL573ObX+Ux4TnpRVjXZC8qcbB4YlHIhFd3d+gkyvehq9cEqpWw4F9w J6F/PR955twR9ecz4WzCodZ7QXw0vmJKXe4nE6haxitCLvCRtAKtrWqACTvc 4d5QKx+JRKQ4rRthwpfHH14Lgr+ji8uiOT4zC3xQXHo+4wdKvBa0PkWRBb0/ tscojvcjz2OOwfO2LOCe1WxqpQwgfNS8ztOeBZoqP5TSrQeQd3U6ucSRBYGb j/JUEgdQWX/k67PuC/p/LlSv1PqFarbH3A8KYMHXwFJRmttv9FeZrJN3BAv6 OpdGWD4cQiYz7iyPChYIumzdnVqGEMdX5POBKhaQek7T/IRDiOG2uSChlgWp o0d/Io1hZKtwo7GniQUl492pAcHDaOss++zXLhZMzJX94M0PI/uHRXRnMSMI X7r3sh5tFKm50NhLthpBtLz4bLH56ML/hrRXeRhBgkL2HkunUUSVTk838zaC G4qtlk5HRlHz8wHluCAjqCTj7wdfjKKwFp3qhBNGIEJVsSxyGUMlUcsH1vOM IIZR/830pACtvGkaGyvGhlysqM6NF6AG/z0vXKTYAC5+nm+yBIgeWhK8Wo4N U4cFdb6VArTDKt29V5UNBx9TC7jif1BMlzP5FZMNnqyT+xsT/6C4ytLnrCA2 aLN1h/xzx5Ed6arUy0Y2bLQ5tvZO8Tha9++fbwUtbNjhAf6jNeNoYCZcIaOd DZmhnu+iv4+j/3ZG7rvygw1yT7iP7+hPoD6ZitI5CWOYMO44OlY6gTZFbPe4 hoyhfl2CMPaNENV7S8hKvTCGnQ05P227hChCQ6nufY0xiPgUt0uMCJHVfJVa fpMxmEW0v+AqT6ITcbybod3GcLeGdi4iYBLxeYdjssRNING1Vvr4xCQaDqNF UZxNwC14Tm3X6mnkaptpIhgwgc/Zh9dvPD2LtM97LF3hYAqXEHvmZcIs0nr1 tFTO0xTwl4nyDdmzCPK3npANMIVcjUjTDVWzqCiqyHJ1mCns5iUaWUvOoZ/o 7p43t00X8vuuDkqdQwcry39MzZmCyJO+5Rb35lFJabpr2QszSNmlH5bxWwR3 7g9dEuJhAS8087Xjl4njTK+7CcJWK3i3lDXE3E3CXWreTk7x1hDeXRkyliKJ Y3p9OgfvbgSFbh/SgV/SuLyKTtJT3ARWVVNuc+qLce4+27C/A+wgdMvNsAub 5PAtfqd4yP0t8Fr0XvsuZ3n82MhZNcXQCfL+jW1N3aWADxdUurXHbYWwJ/2c lWnL8HFSvGuhrCs0Dr53XF2hiK/wZX+fc3KDENVyVZNmJVx28q7H9El3ENuu e5Q3txyb/5JLGiM84GtSVv4qMhnrz/hZ+A7/BXbk5M1kXRWsuX5A/qOaF+SW Lg7d76GKT+cMRxX7bQO7zfGnX+9Xw+JmjN6BBG+oflh6+p9DarjdviiAedkb rJS/nj4bqoZf+AT0HL/qDUbfLMJNItTw03c2PaK53qAe9Ts8N0UN2/gs/0ou 84axSpeIU0/VsPviqMGNPd6QbUI+p7uIgudiRjWuG3NANXvjOZIsBT/leeT1 mHMgjXT43JelFLxm9qPuWsyBC63159JVKbhCzZpdtIUDoUdOccUMKDjpcJpd vT8H7B9+jmp3p+Cda2ePCy5woGa5TPSTbRTc1OE8a5bEAaszJtHJvhR8fkVF VGQaB9iOSdGb9lBwKX0wWSaHA+r9OKboFAW7mmfdp5ZwIMM1JCYxkoKl+huM dj/jgNKzjJi90RSsK6/4/F4lB6TjRmPUL1FwJIw1mDRwIHpIPXbyMgXzGuNd w99yYM7TIbb1KgXLulu0VbVw4GRlWGzhdQrWViYFSLZx4P/7Bp799P2HYxcH /gcnADR/ "]]}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesOrigin->NCache[{-Log[1000], 0}, {-6.907755278982137, 0}], CoordinatesToolOptions:>{"DisplayFunction" -> ({ Exp[ Part[#, 1]], Part[#, 2]}& ), "CopiedValueFunction" -> ({ Exp[ Part[#, 1]], Part[#, 2]}& )}, FrameTicks->{{Automatic, Automatic}, {{{-6.907755278982137, FormBox["0.001`", TraditionalForm]}, {-4.605170185988091, FormBox["0.01`", TraditionalForm]}, {-2.3025850929940455`, FormBox["0.1`", TraditionalForm]}, {0, FormBox["1", TraditionalForm]}, {2.302585092994046, FormBox["10", TraditionalForm]}, {4.605170185988092, FormBox["100", TraditionalForm]}, {6.907755278982137, FormBox["1000", TraditionalForm]}, {-6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.809142990314028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.521460917862246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.115995809754082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.961845129926823, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.8283137373023015`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.710530701645918, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.506557897319982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.2188758248682006`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.8134107167600364`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.659260036932778, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.5257286443082556`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.4079456086518722`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.203972804325936, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.916290731874155, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.5108256237659905, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.3566749439387323, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.2231435513142097, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.10536051565782628`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.0986122886681098`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9459101490553132`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.248495242049359, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.551080335043404, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.684611727667927, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.802394763324311, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, {{-6.907755278982137, FormBox["\"\"", TraditionalForm]}, {-4.605170185988091, FormBox["\"\"", TraditionalForm]}, {-2.3025850929940455`, FormBox["\"\"", TraditionalForm]}, {0, FormBox["\"\"", TraditionalForm]}, {2.302585092994046, FormBox["\"\"", TraditionalForm]}, {4.605170185988092, FormBox["\"\"", TraditionalForm]}, {6.907755278982137, FormBox["\"\"", TraditionalForm]}, {-6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.809142990314028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.521460917862246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.115995809754082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.961845129926823, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.8283137373023015`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.710530701645918, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.506557897319982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.2188758248682006`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.8134107167600364`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.659260036932778, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.5257286443082556`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.4079456086518722`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.203972804325936, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.916290731874155, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.5108256237659905, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.3566749439387323, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.2231435513142097, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.10536051565782628`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.0986122886681098`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9459101490553132`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.248495242049359, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.551080335043404, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.684611727667927, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.802394763324311, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}}, GridLines->{None, None}, Method->{}, PlotRange->NCache[{{-Log[1000], Log[1000]}, {-107.47344420091027`, 32.652280837395}}, {{-6.907755278982137, 6.907755278982137}, {-107.47344420091027`, 32.652280837395}}], PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], Scaled[0.02]}, Ticks->{{{-6.907755278982137, FormBox["0.001`", TraditionalForm]}, {-4.605170185988091, FormBox["0.01`", TraditionalForm]}, {-2.3025850929940455`, FormBox["0.1`", TraditionalForm]}, {0, FormBox["1", TraditionalForm]}, {2.302585092994046, FormBox["10", TraditionalForm]}, {4.605170185988092, FormBox["100", TraditionalForm]}, {6.907755278982137, FormBox["1000", TraditionalForm]}, {-6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.809142990314028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.521460917862246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.115995809754082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.961845129926823, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.8283137373023015`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.710530701645918, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.506557897319982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.2188758248682006`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.8134107167600364`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.659260036932778, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.5257286443082556`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.4079456086518722`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.203972804325936, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.916290731874155, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.5108256237659905, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.3566749439387323, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.2231435513142097, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.10536051565782628`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.0986122886681098`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9459101490553132`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.248495242049359, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.551080335043404, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.684611727667927, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.802394763324311, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, Automatic}], {189., -118.66252583997979`}, ImageScaled[{0.5, 0.5}], {360., 222.4922359499621}], InsetBox[ GraphicsBox[{{}, {}, {Hue[0.67, 0.6, 0.6], LineBox[CompressedData[" 1:eJwt2nc4le//AHB7j2PPrKxKGQkR5+7YSmWcI0LWOZGVkBkNIiUlZCUhfYyQ GannjYaRIjLKXolQoSLj+/yu6/fPOdfreq77ft/3ezznnyPr5m9NZaCjo9PH P/7ve0Wh4FrCQwkI4r6pLBNMgcKj0m/235eAaY4IiiDuk4GZzMPp+PNnt0PY cL+A2zGqtyUgX/tv8o8gClw7dfFKb5QE1K2r7AXcYncoUVKOElAUUzDhiNtg g+1CpbAEBJJJczcCKfBDLqbmFL8EfPna6hKFO898e4WJRwLGktJbz+Fmvbca aMcsAQrCPd5k3F3qEwEby+LAPvZjawdutzPPfU26xaE5Ksi89DwF4j76Uj/f EIewGY61xgAKfB6o1VKMEwft6le7SnGrjG6znr8iDpeyy0yycHfN3ylmDxMH vkM1RmG4xZlrl3Ro4iCqtHZME3eZ9lbYPSQObgqn4grPUaAv+9Yt21UxeOqe PhjuTwHl/P7TuT/EIPvIT5czuCOKZNS/z4tByHG7bhvcMrWVPVcnxGDGacRH BffZD32iVR/E4HHYlxtDfhTYopfO5ysWA+ODBlY6uBXOlNe9dxaDxTuqasM+ FKj0ukk+6yAGXs4Nsq24kY/XMjNFDCTZxDcqcTsE7FTVtxQDwuTPs/G4b0fc KyzRE4MDUvv3aeBeT4pOjRcVg2cGYpqXvSnw/tnxQNJHUchXdL7EdZYCp56r 8I10ikId96+TK14UmH3BXh7WJgpNkb+Eh3AztrTMVYAosE20kEpw63Rqu0mX i8IXIz+KGe68cWmrjRuiMPj1oc1FTwqEcPzYV2ssCiEyBe+6aRSo3Zb6cuaw KDBM8ebX4v69Yhknpi8KV86pOmbhDhotGY3UFIVed84LHrjPVZ+5bbhTFDZr 6o1WqXi+nEd/dtGJwqRPmjofbufK99Xzz0VA4bTOaXV3Ctx/vOlyv04ELgYQ j/LjHspW4T5eJQI7bjSLLLvh94tLoFYWi4CmXKl5Ne6TjibCYRki8DWIV+gA bmuWlyEsISKw5Vi0S82VAsYOT3RlNURgP/Iy4DxNAXnV4tDgvSKwHt1ROuVM ASamx7VtyiLg6sC1+AJ385NcjfPSItAbRZn1x43oU3a3cIkAo712bbcTBQ79 Fy5O/SoMi/VVcTcdKaDx23T9v2xhGOTJCB22pwB/h5HO5j1hoJOt66/A/fPB 4QtWd4WhpfQ+QwzuCnO9X2vXhYG7/EPDLtx77++bswgRhkdKbGXnT+L9ZyT0 +buVMNBGJzzXKRSQSp6oV2MVhgLxJ16jNni93ANf9TIIw9sHArrluK01mT6E bgkBtWb0UxTuuD6FKVgVAqnuZr8duH+Ie/FYTQmBZKez9ElrCjTlL7kFNAmB tY+vWcsJCnjUbHBWRggBcr9M8LekQNS1RGFKiBBUOScNauNOt5OSXT8vBEu5 J2l0uDvXiFqks0JQNyDUfvsoBbQMrrp8PCkE3lFrlWVHKMD2lr3m1wEhSPI5 +2HEnAIlA8LO+38IQtq5d0d4TChAux68HjYvCLz+Bs/ajPF50u1NgxlBaLtx pycGd0rWnQ+Ww4IwRDsltG6En8eZ67BnuyDwd800jBni952il79fIAjk1VLt nMMU+Lv0/RuLvSD41qJ9/Yfw+co9cs3SVhBGop2r43D7WhXLpRwXBEiLGtLG PVF55pSsiSBYnGHnu6dHgY7giXd6+wXhEx/r9gldCuT86y8/xy0Imge+JFRq U8CItSX4c5MAPGaqVNqlgdevOFBG+4UAmHmvPH+vTgHJY/Idd58JQF2P0ddA 3KspsTKW5QIgtG8X/Qs1/H0rZ9aBZQvAz827mhaqFGA36JR5FCIA896YygkV fH6D+jv89wqASvfMZxZFCuiKxl94pywAOuJ5DjkK+PrnOrK75AXAyU3W9QDu aIbMCxPiAvCgXJfOTZ4CarcdZclsAnDb0DGkRo4Cd0vGL+hO8gOlz73DSBqf j4l5WeYMftCaof6lE6XA9mW1jKcp/GCBgHJbBN9fNpjgfJsffq0e05PGveKy tVUbxw+3b2yk6AlT4M4oYcjzAj9shkpH+glSoH3oQNo7G35gElvIbyTg89Af zZHCww+xEZpJv9koMHnh1WXEwQ9xVqYlwbgThNnXvjPzw7U9AodWWCkwQE7+ arzJB53rUfVLLBQI7i149WeeD2Z6dgqMMeHv5+62qFNtfNCzI+L5Izq8P94J LMvF8MGccFQi/CHDmSOKGwHRfLAhfDpTBndZuw5zUzgfVOmvzUf/JoN+m5PI 6QA+cNn8aX9olQwObx7rZTnzQYPEolnpLzKkgl6MwEE+sJN7WH5mgQwcNe5C TIsEcCuA4yYTZLDSvCBl840AqnTyeonjZEivilfKmyKAyQ+pYz1jZFCqfHIQ fSGAnO7PGcdRMhiV/3GKbCWAfL1rK3WIDNFFNwpX8gj479oDL8s+Mqzcr9Ke tiPAdcMDkz5tZLgg5sAdY0OABy9S2R61kuFvCt2k3HEC+Esesh16S4aNG5a3 XEwIoJ5Q6WD2hgzM4V+nvmgSwDgzjEO4hQzCFInkj3wEsMld3BnXSIZzkiyD 0fd4IUT6SnR9GRmCBGxiXtzihaJYqbTeJ2QI5chV/RfLC7aHZqsWS8lw+e/B axeCeKHUYZhOpoQMyb2++32teOG7IVvLhcdkqL75KdGBkxcmLjeuLz8gw9pG AelANA94+OslK9wmg9tgKseDCzyw8PRhnnwSGdprrn1k8+MBoPHmyd0iQ6af p9uQIw84mqd6Sdwkg+7YnitXdXmAeUByYzuODBEtlU3dq9xQG7VXIyWaDJvX Afn5cMNNFWLzmC8ZaLSnbAPu3PCGIhLx3IcM70l5XYdPccPu5uubKd5kfD6v ughZcENWvrGDkRcZDHxNLzUqcUP8qsCJFA88/yfeYxyTXMBYJcX314EM9CJD Bo/tuSD51+y71yZkKK703E05wQX1Ub4NDsZksD62KsRsygW/rZjZFw3JkBfL s+CmyQVkCbtm3sN4fVdQlhQvF/x4dCmQqEeG+O5Hf1JfcUKjr7vuMVUyEG76 V8SocsKeTn+KpDAZniltZO1X5AT3vd79YYJkcG2Jj5uQ5ASBF4kXP/GToXL9 oTPi4ARJTwf1OF4y2Hr1cm1McYBmlfp2DxvebyYHvQIzOaDZzdaf758tyNAz yrkxc8D1tGIF7hFbMEitK6zYYIdADc38I0O24LjLZ8/2MjvEMJ43j/9sC+lW nzSzJ9hh+9UC20afLfDlPTbtw9ghPvyzbOcHW2AwPOprEc4OA1VEJcEmW5iK SX2mscQGAlfDc5Xz8OdiFvqXZ9jAZb97qXIuHv/JVtOHYTZYIY8/UszB4306 0+Hzjg1ScpfsJTNt4ZOC7khhERuEUCm3F+/Ywps3I4wSHmzwep3/qsplW3jM pnyccZAVRLbGqumcbYHFMfRP2gdWIOSVlF0/ZQse5a0Pdr9hhZzkZ4u89ng8 itcPqypWeBKGtAVtbSEzv/hObiIrMPjTHv4zt4VbBnt79UmsIOijmmx4wBYu BGnYh5awQI01uvKI3RZ6316h58pjgdi/LRofWWxhv0RP0YN0FpCP8//0j9EW fjQFrr+JZYHzTbkzxls2cJa3JkvIhQWq70guVv+yAedi7ZFKQRagpJ4lbny2 AeOxQ+4LF5lBw/6X344iG2ATU1d+EsQMtuMmnr8e2UC7lcKCjzczHHu0JfUq zwaOtXCHfD/JDITawQanbBs4WTiSML+fGV5cOOnplYTH87lU+e0bE5CXPC+N BdnA7b8t9DNkJhj7XqWjr28DXwhHckf2MsLOxIqjWi3WwE86s6WvwAiLjmjK D7MGi8CrjvclGeHkBzO1gufW0PDpuagjJyOgkPwxpmpryMxUuTM4ywAD5/Kj cwqswUGe50pvPgMU0i2Wq8daw2ftbvd2MQbIzyxu6DK0hkFnO6VaZno46nRh d2etFVgf5y1y2KADsvLlrbdPraCd+Hb39i86OKAT3/6y1AoaZLT3mY3RwYMq bsvcPCvInhA+8LmBDtpzEgj7b1mBM62PtOVPB8IPYzzSPazgzZfixpvV21jf 3zNL3jxW8GWtcPcTp01sPEuqrIFyAnrPZWU2bP/Fls/3PrBptIR/cf4D9kYr 2HzJkXolJwuQyS+79Up9BTtxsXtq67gFGL1cMFKVXsHyny8tDpAs4OaK91Om 9WVM6oU9R5qyBUi5eiaUly9jkZpyJ7RXzAHpuh5illjGfDn42vbeNIdr361z K37+xMbIvw8VYWYgl+fTxWOwhM0MG1d06prC4YaEh24SS9jO5SnRNVVTcPn4 3/nav4vY2LT8oIqCKTxgmBZ0rlrEKlwdqp7wmoKku5P9E+VF7PD5Lh6RaRMQ kj82cURgAfvee2pP5h0TYCtUXYmfncPga1bw95/GoPTS8vXQ6zlsbHk5x3zW GEz6vNPU8uew2oKjd5+OGEMsy386A05zmGkXg2JehzEwnJG5qNTzDRPufLDA WmgM/5T4WN68mMV83owkrDoaw2LRLxHGuzPYa82dx7t6jIAHiw7x9p3B+o7a Ga21G4FqL1d/j+kMFjM87KHebATnthTTCjamsUTeouAPFUawbH1K0IQ2jcnE Gi29umUEf/+1EK4fnMI0ZdOzH1kagSif1bmfAlPYT+dbUu3GRnBQceSD/eIk 9nOofnlL3wjCT/y9tTt/EmtCO4Yz9hnBRoEK9zuuSUxW+1tCGsEI6I+lsvOO jWNnlyxH6/sNQc5dziukYRyTP00Omu8yBFJoeetoyjj25UGF+752Q4jJa4ur MB/HDsLIrdlGQ2D5s8lsXTWGGQYPv1TNNwRh1Mm0m3sUyzFndRMONAS7s19b 1ptGsNYErrsevoaQnkJ/tePCCPZTZ4nl9RlDkPh2gN53bBjLvHx9odHREGSS czbLq4awHec+7EkwNYRdU/6/Dzh8xhxG1F49kjEE0Y9tUYyCn7GAsZbMs5J4 fNjJ2t05iHlW5vMgUUOYyOoX8Tk8iD2XN1uVJBhCpg3xYJ7yAMbAerDjAZ0h xB/OaPKf6MdqVt5kzG2Q4ILqsrl+dj92+UC/lckaCWw4HzsM8PZjv1rI+Wq/ SMDVwhPJ8+cT1vFKor17igTrFZ5MQxWfsJyuK5MF4ySYzWm+WXT2EybUH7Lv +ggJXodfuG800otRp2YjYgdIEKUx8jL8dQ/Gwf102rKTBD4yOqZm0T0Y0/CL yJJ2EjjwJH8QOtiDPZBPvS7eSgLtOeOxitKPmGdglcLeFhL8ePiE/uvdbiy+ cd9RhQYSjCSxJlRbdmOzP89d4H1GgncXXfmvsHZjAULGdpy1JCiyF9q5I6IL 2+Mh4KhTSYJ7pv4lc5pdmIPy4ySvChJweCefOTf8Aet2o8soLSNBi9x6fOGr 91gpVB3xLCFB7taTjMM67zE+S3Om8SISRH52LR4q6cQELkg89f6PBJrJbR38 d99hC2wBzHWPSEDwuzj0hOUdJvKj73lIAQkWzNUXzMI7sEIwiLHIJ0EhfQZP tGs7dr/Vw1PxIQmuDB+VFv/Uho1VPU1WzSXB6Xo6tRqzNowdSX23eECCQ6nV 6ERjKxY+MBARmkMC0QBPq3nVVoykxWL+7D4JVo5Kul3Lf4v1XWty4MDdrdx1 XlbkLXYpWfKZXzYJyphirjYmvMFOTUh7TmeRIGFMO8Vu6zUmPdMe4Ieb1jhf 8CvgNeYsJjjEjtsw/UFN4vQr7Lrytyd1mSSQCbJ5o2z/CosUUl0Mwb1xnLW/ 5V0L9vxUc74F7oE9z786oxZMRzDkkyrualb/v2tVzdhLUbEEJdy3J+XYU5Wa sTVFn1Z13L5Yn5haVhPGyahy7xju+J+tKzf5mrDU8rmxSNx5O59/+BYH2JLb Ns8L3KElDuTEDQyzqy9V4sXPV8pL5DT99hL74b1PPRD3eODOJrq+F5i2X736 N9zCA6whDc2NGANnpGoAfn+LQ99VgsqfY9L0OWqceH6ic7sm9mY3YLcfIL06 3NVMNelf4+sxu/EocjCe31nPjGMPg59hn+J9Y43x/O/ovMh0yq0Oe6cr0a2E 18da3a1B8HgtNpt+20ASr9+1VJNz7/VqsM+nunrk8kjwfG23YrxyNUbw7U/T w+st37x85x99JVZQzP8yH+8Pe8UB05rFCux2lPy+5UISSAiF/RuuLcfEZeon bfF+WnzE0fPKqwQLaZvTOo73n51fj4GOYRHm3a479rWUBKCVXVwi+RgbqQuc Scb79e7bvVeSP+RhF7+8l5HB+3sj6fcCc1EuRlKMdGGoxuehIqrqF9N97Ha5 suCfGhIEfHzoBmdTsN63rosi+PyMPUGsI5Ve2BBzHLcOPl+C96ihfd5WRC27 KzfLXpMgXK6H6JAUTPTif1+qjc/jL8v8Jr6NG8R+v7Kvl/H5LXO/ccVX4wEx S1R04jc+337fIskt2ENiuP5BVsYhEjDJVn87PpNPjEtfXpMdJYHGbTl+r/3/ EZ8wEJzTp0lgUhf9tJNWQfziJlt/ZpkE/DZZ/wTCnxLthF0mOf6QYHix1tgh sZJYJ36XpWmdBEGKi4MzVdXEeJfDljQGQ3iY6shAR19P3Cb8PJfKbwhb9dm7 MjqB2Dh8tCJByxBG7i4Kzrk1EUfrclra9AzhpS+i0/vbRHwhUHFL+rAhRMlO 9Q3JtRDzPR1ovEfx9fF7YmRCXxMvZrz7SOeO265h5LFcO1Fh6ZWZWiq+nzpX +9+6dmKs19rEcBa+H6dzjbllB1EzajErLw/fD6O/OR/yjmh/R+VqQAW+XtH8 oGrne2Joi8knhU5D2F6fN//yvJtIvZn6dYHDCJa+pmBXWT4SR2a1rAkCRjDa q39AxeojcXbRQN9CwgiwsiSZizMfiTn0XKVMKkYQ7bb/jxRfLzFpGUtKOWYE 223hBW60PuLoe4K/QjrudPbtb4QvxBJycpW6vjGQms+XpFK+ECPenJW6bWoM MfNf7A5nfyFqHgpNZbQ2Bg6Dsop0pSGiHpt23a4zxiA8ae1majBMHKzgUAtM NoZ9e7NfF3iPEuV/N7JufTeGcheRN6qT40Teq6wH2CtN4MTqkWxmlgninQaR OF7MBH5dv3T+i/IEsZhNznjPOxM4UPVNKs5vgmh8UYw7f8YEnjM3hoysTRCP uWnRpUiawttil12JhCliRb1fV+RNUxhdKbo5pz9D7Dg0WnAu0gwu3fTvLXGf IY4HRc6EJpqBjPwBSd/rM0Sjoh8+mTlm4GIDJUu9M8S10hbDXU1mMPa0r33F +yuRBdP4EcxqDmN+jOzbGbPEfPPB4LZ0c5iYdYwV+D1HDM1re3j4vQVcuSTX 2SsxT2QYNhP1nbAAOdFZwbTD88TkXnWHp78twM00sEA0cZ54S+DfzhjpIzDx 6HrLDvnvxD+dCptW54/ApFstvbL1AvFf4EBQnORRmBrijTpUtkQsM+914r9q CSsjxjaWPUtERbJL7ECGJTCPRyg7/10i9hSlm9VUWMLdX4HfiLI/iJd4pb0q Ryyh+vfoXVfvH8SVZo/ger1j8GerbrZg+wfxsMPl5e9rxyCS1zN5j/IvonTa gWgtwxMQq9Y6rRO2QpS6eudC9IIVtGrf/Hut4y9xwfwPt5IjGYZzzukbRmwS tbSTuY2P28MdqkpIxgIdanWhv7RjxhEa5R4rJvAzIgOy0MIUhwucO9b2ekCC EdH554AtnwvIh897KCkwomAjVjUQcYHEbtX8V9qMSPl+aP91eRdwvvRMetuR EZ127Nz+qu8C9CNtokGPGRGXaf/jTn8XMMn4zuF8iAmFTT93Vu9ygS5ejSV1 GjOSNbKqVLjqCryGKqtjfsyov/9huHC8Kxy7oPgvKYQZTf9WIDEmukLHkDjr YjwzUh6/1t2V5gpvihili0uYkc/uOyyHil3hueGnY3I/mRH3QtJ1my5XKAwJ LeOPZEGp4sdO3xJzg+ni89VNMSzIqzp5jk7KDeRHfBrOJbIgRvcT6f5ybvDQ yPXN+xwWFChz0PXwHjfI5rMYSWhiQc8Nl3pqD7nBnRIJHkZWVpQWcqVwztkN Ikdf+i7fYUX3tPZqX8l1g3CbHSecsliRf2lzY3eBG4S+jdB4W8CK2LcPrEsW uUFwuc6fzDpW9Dd7s7DwqRv4RVdeIg2zIqfpb4S4ZjdwlS68e0eZDZ1ajguL mnQDk9OJ9aoYG0q8tDHtIOcORj3zWRmtbOgSVeCRoqI7GJpaRDF+ZEO7ZR4G Le5yB6TKatg/xYb+iA6fOK/uDge3L72L4mBHCW0nTxxB7qDyIGi0k8yOTFIN mYyd3IFv9BSzz3d25M1XcdgnxR0yHZKPaa2yowJIT4y75w5yfa336LbY0WGZ lJcPMt1Bs/PA7lReDlQlXzT4JtcdKM95j7/U4EAb59MP/ih1h+x7LemEMA4U tlnS/vSVOyif2KNSw8yJTmp+Dqb/5Q5PO1yDo3k40dfjCSovV9xB1zT9pbkI J1Ka4BYJ/eMORwyYrUaUOVHWK5M7kxvu4KcyGsx6lBNJ7LV3zmD1gCq2u5h9 MidK0dgTckXSAwya1q23pLjQru+O5FNGHuBulxidrcSFlHqHpOpMPCB+QbpU V40Lqdxmukww94CPYsbMIYe5kNHrTZFGSw+gnk+qW3LnQlUjOp2/KR5wc6e8 5Ph/uLvktTY8PWAw1nK6RYMbpQdKvyff8IAtiTE+Nz1upPBy+51nogfIVZ43 oDPiRv5Sg4/DkjzAZ+TevUNkbuSkkriWctcD6LQnzGtCuJHICwvjyiwPUJy9 UFbYyI0u0/QOXS/xgCCL3JDrJjyor7TEqrbNA07K3rs0cZwHbVIS2Ss6PED/ b+J1PXse1PN+OvZxpwewFEZkLXjzoNF9Pp+Suj0gnd4Os7rDg9BSKJ/JoAc0 PuNmFR/iQbcGo5iOzHoAk1JEWnEAL1JQFXv8hokKs5sBDxgjeNGRN89PXWSh Qmev53+OMbwo1uuRpAYbFdKuUBp47vGiHPLrjlROKiiPqI+cb+RFu//xipvw U6HQYiX5PiMBlY0amB6VpkI7fcln6jECOtfJxbipTQWGgOTkZmsCasqNmD19 kAoHx8IspO0IiLHHzrpJlwr/vTRrGDhNQDZfguuj9alwLWIm40gAAU2stm7P kahweFXWXj2FgEqcDzdGWlLh2Wx6/8YgAdk1Gijfc6XCD7tLSfYjBOTFdj+k 040KSm/PmNZOENBT7WdhDB74+R9p1fnPE5DizdQsTxoVgtx60yY2CGjVrSZC wZsKqkO8lFZpPvTKKLPfLQi/z4drvXepfCitZJVzNZYK+qdz1y3P8iGdRO8x 8Tgq9C7Wy7D586H5g9NOxHgqMPIs+ESG8qG+GEaHmAQquBy1Yabe4EMMu3wv b92ignibtJbWUz4UfqrsS/U9KtxqfnZvYIMPifzzHtv/HxUUrD++SKbnR/Vq LmXqRVRoHJ+fPMrCj1S/WtrsK6bCPJ20WhMvP/Jj9FOSL6WCGTG2tUiOH8XL D+xgqMDz22i1Fm7Gj173HD0TX0eFkJo5hx0p/GhQdS/p7WsqOFpXnm9K50fR K41+OW+oQFoKS6De50dNLPfyg95SgWsXe8OTQn7UPnR7t1QbFfKylcQM6vmR oo7SO+o7Kry76tHvPMKPqottj7V+pIKc9YhNrrIA4jtrljo+QgXWpUfeRnsF ELPZk76sUSp8v+F7dVZdABGVHQ6Tx6hQ93qjUk1PAH1+65L2epwKRw9K8DdZ CiDJ3jr77Cn8vDInu8bPC6Ac9k7hnXN4vMXuoztfCKC9r16/zFqhwoUk5vSQ JgGUpPxZTmOVCrJqByc7Xgugr74M029xXwjIDQt6L4BuzJOu/fxNBZkVv8LX owJIBlkc11/D673GSefJIIiiok8l1W1SQZLJpKrUVBC5c26S9Fho8KYgbIvu qCDq2TlY8hJ3gPETc/IJQeSyVyruMCv+/Jrg2OZJQQTvDt8zZqPBOfZJruNn BVG0tfs+Uw4avOK5RPt5UxD9USuuV+Ohga9Yg5jWR0E0wHVN/aEQDUI/S/d8 7RNEfUEsxTuEaXAlK/Zmxhd8PYH7TgbutB1W2xtTgijhjdWTJBEagOzsVMsf QfRphqAeLEYD/t3CFVY7hFAfa/mqwg4aPNM9b+LrKYS4/AI/yMnToPlf/7aU rxBa6Cy0voX7XaN+fVeAEDobufPkGu5xA3YVzQghFHyV9L1TgQYchrl8/xKF 0L2o32YBSjRwOvJ+KL5KCJ0U5rF6uJsGDI67Awu2hNBBiauuxWo0+CizcZqF URhVzVkK06vT4OF051FPVmGUV0T1scON/AMUVQjCqMJLdItBgwZRV54NVskK IxOobybvp8H6fyaoxUgYOWesKc8doMGvVTfuiQRh9MVpWqBbFz9/g+a6YZIw 0vQWqpTUo8GdaJavj+4KI9V7RZtncKuxF4NXtjC6cZKWs4nbT/Jn4M8nwogl aYVXQZ8Gc6Toz3Tdwmi9DdFRiTSYTMp6LC0ighwsLLxKDGlA5yZxzVtCBP3e 2E/4jltKM8ujTloE2QkMBagY0cBhIFP2uLIIco9NopXi7pLJzIo6KIJaNhN2 FBnToPFpetLwKRFU5sVHn2aK16snNSQrVwTVq2PxxCM0qH4kRPlaIIIeCOjy heLuDknV3F8kgg6W7nSqwM0lmfqz/akIKiGYIJmjeP09UrzXm0WQ20an7iZu /9Xk0/bTIggN6euUHqOBmchtU5Hdogi9zaUfs8L7j52UAvtE0cuzzA+FrGlg uLE85rVfFM2PCjMcwW0wbhfeeEgUmUa4ctTg3l8i/cT1uCja7vHWu2aD35dY zl8aJIpi3q857iDTYJX2fhhhosj/WXW4zEkanLe/tHuuRRSFHfrw6RjuH0c0 Qu62iqL7d1n/ReKeU0sjzHSLoqnPHQUDuMfWnQxvTImij5+9IhPt8X67tfDf J3YxFKlrEbDgQIO8Wq6gs7Zi6K78F+54JxpMle5eaTkphpKuCwY9wa2Ubxa0 w0kMrf5qePoRd2lSTFAXVQwdfLRVJelMgzrPjSCtEDFkN60wWIb7nfj3YIZM MRQtdrGj4zR+/qiOkMxRMVRiqh/4zZUGOsHf/ixP4vEPDohyuNEg3Js11HJW DN0sZc3ajZvupGEo3U8xpJH+4oA3bg7156E0BnF0nK68dQ631GRxmIaCOGKq 8Y2ddMfzb5oQ0X5WHOU3nzrZSKVBS1ltxCN/cfR33klxCLeB8GTEpSBxpGww 3PkP9/5pvUitKHG0nctdrEvD97u6EJl3RxzRr6DsWtzLL09EhT8TR5tr6UmP z9AgR0vk8m4WCSStYTTl50UDsRzDy8ycEuinkbROAu4U5nOXx3gl0Jzw5NlH uK/3tl5OE5NA59he+37BHXQ+/ArDXglEZTJbMD5LA/Oy4aufbSSQ1iWnVUFv /H0kxBFTc1ICNT7aabEPt8FFrZjbThLIzEr/kiluzaNJMSZnJFBz5vbtMNxS cyi2MlwCxXa9MhvCnWHlG5sYLYG2D+0tXcEtWJ8R6xkjgVy9uX9x+dCAPf5X rNQtCbTnW4uCPu6YJalra8kSSFd3XICMe4ty5FrvPQk0f4Jp2gd32MuQa+XZ Eoje8ERGDO7///8OevPvq1o27v8BgEWC8w== "]]}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesOrigin->NCache[{-Log[1000], 0}, {-6.907755278982137, 0}], CoordinatesToolOptions:>{"DisplayFunction" -> ({ Exp[ Part[#, 1]], Part[#, 2]}& ), "CopiedValueFunction" -> ({ Exp[ Part[#, 1]], Part[#, 2]}& )}, FrameTicks->{{Automatic, Automatic}, {{{-6.907755278982137, FormBox["0.001`", TraditionalForm]}, {-4.605170185988091, FormBox["0.01`", TraditionalForm]}, {-2.3025850929940455`, FormBox["0.1`", TraditionalForm]}, {0, FormBox["1", TraditionalForm]}, {2.302585092994046, FormBox["10", TraditionalForm]}, {4.605170185988092, FormBox["100", TraditionalForm]}, {6.907755278982137, FormBox["1000", TraditionalForm]}, {-6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.809142990314028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.521460917862246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.115995809754082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.961845129926823, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.8283137373023015`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.710530701645918, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.506557897319982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.2188758248682006`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.8134107167600364`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.659260036932778, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.5257286443082556`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.4079456086518722`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.203972804325936, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.916290731874155, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.5108256237659905, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.3566749439387323, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.2231435513142097, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.10536051565782628`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.0986122886681098`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9459101490553132`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.248495242049359, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.551080335043404, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.684611727667927, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.802394763324311, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, {{-6.907755278982137, FormBox["\"\"", TraditionalForm]}, {-4.605170185988091, FormBox["\"\"", TraditionalForm]}, {-2.3025850929940455`, FormBox["\"\"", TraditionalForm]}, {0, FormBox["\"\"", TraditionalForm]}, {2.302585092994046, FormBox["\"\"", TraditionalForm]}, {4.605170185988092, FormBox["\"\"", TraditionalForm]}, {6.907755278982137, FormBox["\"\"", TraditionalForm]}, {-6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.809142990314028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.521460917862246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.115995809754082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.961845129926823, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.8283137373023015`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.710530701645918, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.506557897319982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.2188758248682006`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.8134107167600364`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.659260036932778, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.5257286443082556`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.4079456086518722`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.203972804325936, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.916290731874155, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.5108256237659905, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.3566749439387323, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.2231435513142097, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.10536051565782628`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.0986122886681098`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9459101490553132`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.248495242049359, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.551080335043404, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.684611727667927, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.802394763324311, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}}, GridLines->{None, None}, Method->{}, PlotRange->NCache[{{-Log[1000], Log[1000]}, {-179.39406628903652`, 0}}, {{-6.907755278982137, 6.907755278982137}, {-179.39406628903652`, 0}}], PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], Scaled[0.02]}, Ticks->{{{-6.907755278982137, FormBox["0.001`", TraditionalForm]}, {-4.605170185988091, FormBox["0.01`", TraditionalForm]}, {-2.3025850929940455`, FormBox["0.1`", TraditionalForm]}, {0, FormBox["1", TraditionalForm]}, {2.302585092994046, FormBox["10", TraditionalForm]}, {4.605170185988092, FormBox["100", TraditionalForm]}, {6.907755278982137, FormBox["1000", TraditionalForm]}, {-6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.809142990314028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.521460917862246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.115995809754082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.961845129926823, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.8283137373023015`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.710530701645918, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.506557897319982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.2188758248682006`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.8134107167600364`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.659260036932778, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.5257286443082556`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.4079456086518722`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.203972804325936, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.916290731874155, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.5108256237659905, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.3566749439387323, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.2231435513142097, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.10536051565782628`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.0986122886681098`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9459101490553132`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.248495242049359, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.551080335043404, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.684611727667927, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.802394763324311, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, Automatic}], {189., -355.98757751993935`}, ImageScaled[{0.5, 0.5}], {360., 222.4922359499621}]}, {}}, ContentSelectable->True, PlotRangePadding->{6, 5}]], "Output", CellChangeTimes->{{3.5020885068623705`*^9, 3.5020885490647845`*^9}, { 3.5020886000647016`*^9, 3.502088611786372*^9}, {3.5020888115878*^9, 3.502088879090661*^9}, 3.502089094439978*^9, 3.502355707098464*^9}] }, Open ]] }, Open ]] }, Open ]] }, WindowSize->{989, 812}, WindowMargins->{{26, Automatic}, {Automatic, 9}}, FrontEndVersion->"7.0 for Microsoft Windows (32-bit) (November 10, 2008)", StyleDefinitions->"Default.nb" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[567, 22, 92, 1, 36, "Subsection"], Cell[662, 25, 3012, 71, 132, "Input"] }, Open ]], Cell[CellGroupData[{ Cell[3711, 101, 360, 6, 36, "Subsection"], Cell[4074, 109, 381, 13, 57, "Input"], Cell[4458, 124, 475, 14, 57, "Input"], Cell[4936, 140, 389, 13, 57, "Input"], Cell[CellGroupData[{ Cell[5350, 157, 219, 7, 31, "Input"], Cell[5572, 166, 2620, 69, 70, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[8229, 240, 172, 5, 31, "Input"], Cell[8404, 247, 2616, 69, 70, "Output"] }, Open ]], Cell[11035, 319, 1259, 38, 72, "Input"] }, Closed]], Cell[CellGroupData[{ Cell[12331, 362, 362, 6, 28, "Subsection"], Cell[12696, 370, 385, 13, 57, "Input"], Cell[13084, 385, 419, 14, 57, "Input"], Cell[CellGroupData[{ Cell[13528, 403, 184, 6, 31, "Input"], Cell[13715, 411, 1455, 39, 70, "Output"] }, Open ]], Cell[15185, 453, 546, 18, 52, "Input"] }, Closed]], Cell[CellGroupData[{ Cell[15768, 476, 378, 6, 28, "Subsection"], Cell[16149, 484, 526, 17, 57, "Input"] }, Closed]], Cell[CellGroupData[{ Cell[16712, 506, 549, 9, 28, "Subsection"], Cell[17264, 517, 660, 10, 29, "Text"], Cell[17927, 529, 586, 17, 67, "DisplayFormula"], Cell[18516, 548, 780, 14, 32, "Text"], Cell[19299, 564, 570, 17, 45, "DisplayFormula"], Cell[19872, 583, 294, 4, 29, "Text"], Cell[20169, 589, 251, 8, 31, "Input"], Cell[20423, 599, 353, 6, 29, "Text"], Cell[CellGroupData[{ Cell[20801, 609, 299, 8, 31, "Input"], Cell[21103, 619, 1476, 40, 70, "Output"] }, Open ]], Cell[22594, 662, 353, 6, 29, "Text"], Cell[22950, 670, 572, 15, 31, "Input"], Cell[23525, 687, 422, 7, 29, "Text"], Cell[23950, 696, 437, 10, 31, "Input"], Cell[24390, 708, 695, 11, 29, "Text"], Cell[25088, 721, 992, 21, 31, "Input"], Cell[26083, 744, 516, 8, 29, "Text"], Cell[26602, 754, 1027, 18, 31, "Input"], Cell[27632, 774, 471, 7, 29, "Text"], Cell[CellGroupData[{ Cell[28128, 785, 5638, 125, 132, "Input"], Cell[33769, 912, 5976, 159, 70, "Output"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[39794, 1077, 418, 7, 28, "Subsection"], Cell[CellGroupData[{ Cell[40237, 1088, 176, 4, 31, "Input"], Cell[40416, 1094, 2029, 57, 52, "Output"] }, Open ]], Cell[42460, 1154, 1370, 44, 50, "Text"], Cell[CellGroupData[{ Cell[43855, 1202, 1214, 30, 31, "Input"], Cell[45072, 1234, 2505, 76, 52, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[47614, 1315, 1992, 57, 52, "Input"], Cell[49609, 1374, 701, 20, 32, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[50347, 1399, 560, 15, 31, "Input"], Cell[50910, 1416, 626, 17, 32, "Output"] }, Open ]], Cell[51551, 1436, 253, 3, 29, "Text"], Cell[CellGroupData[{ Cell[51829, 1443, 990, 27, 31, "Input"], Cell[52822, 1472, 2599, 77, 52, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[55458, 1554, 827, 22, 31, "Input"], Cell[56288, 1578, 2482, 69, 52, "Output"] }, Open ]], Cell[58785, 1650, 268, 5, 29, "Text"], Cell[CellGroupData[{ Cell[59078, 1659, 586, 17, 31, "Input"], Cell[59667, 1678, 1108, 31, 32, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[60812, 1714, 1297, 38, 31, "Input"], Cell[62112, 1754, 724, 21, 32, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[62873, 1780, 1022, 29, 31, "Input"], Cell[63898, 1811, 1069, 28, 32, "Output"] }, Open ]], Cell[64982, 1842, 552, 9, 29, "Text"], Cell[CellGroupData[{ Cell[65559, 1855, 3193, 78, 92, "Input"], Cell[68755, 1935, 2588, 70, 74, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[71380, 2010, 148, 3, 31, "Input"], Cell[71531, 2015, 2062, 58, 51, "Output"] }, Open ]], Cell[73608, 2076, 200, 2, 29, "Text"], Cell[CellGroupData[{ Cell[73833, 2082, 1812, 46, 92, "Input"], Cell[75648, 2130, 1375, 38, 32, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[77060, 2173, 400, 12, 31, "Input"], Cell[77463, 2187, 1461, 39, 47, "Output"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[78973, 2232, 238, 3, 36, "Subsection"], Cell[79214, 2237, 633, 17, 31, "Input"], Cell[CellGroupData[{ Cell[79872, 2258, 639, 21, 51, "Input"], Cell[80514, 2281, 640, 17, 70, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[81191, 2303, 866, 25, 54, "Input"], Cell[82060, 2330, 1110, 32, 70, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[83207, 2367, 523, 14, 45, "Input"], Cell[83733, 2383, 498, 13, 70, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[84268, 2401, 309, 9, 31, "Input"], Cell[84580, 2412, 511, 15, 70, "Output"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[85140, 2433, 382, 7, 28, "Subsection"], Cell[85525, 2442, 1265, 21, 47, "Text"], Cell[86793, 2465, 962, 27, 47, "Text"], Cell[CellGroupData[{ Cell[87780, 2496, 253, 4, 27, "Subsubsection"], Cell[88036, 2502, 346, 9, 31, "Input"], Cell[88385, 2513, 1538, 22, 47, "Text"], Cell[89926, 2537, 282, 5, 29, "Text"], Cell[90211, 2544, 244, 3, 29, "Text"], Cell[90458, 2549, 168, 4, 31, "Input"], Cell[90629, 2555, 851, 13, 29, "Text"], Cell[91483, 2570, 157, 4, 31, "Input"], Cell[91643, 2576, 350, 6, 29, "Text"], Cell[91996, 2584, 141, 3, 31, "Input"], Cell[CellGroupData[{ Cell[92162, 2591, 160, 3, 49, "Input"], Cell[92325, 2596, 96, 1, 30, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[92458, 2602, 234, 6, 47, "Input"], Cell[92695, 2610, 114, 1, 30, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[92846, 2616, 173, 4, 47, "Input"], Cell[93022, 2622, 114, 1, 30, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[93173, 2628, 394, 10, 52, "Input"], Cell[93570, 2640, 144, 2, 30, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[93751, 2647, 385, 10, 31, "Input"], Cell[94139, 2659, 849, 25, 71, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[95025, 2689, 577, 17, 31, "Input"], Cell[95605, 2708, 964, 27, 71, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[96606, 2740, 272, 6, 31, "Input"], Cell[96881, 2748, 708, 21, 71, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[97626, 2774, 222, 5, 31, "Input"], Cell[97851, 2781, 737, 22, 71, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[98625, 2808, 331, 8, 31, "Input"], Cell[98959, 2818, 1071, 28, 71, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[100067, 2851, 279, 7, 31, "Input"], Cell[100349, 2860, 1019, 27, 71, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[101405, 2892, 249, 6, 49, "Input"], Cell[101657, 2900, 456, 11, 48, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[102150, 2916, 149, 3, 31, "Input"], Cell[102302, 2921, 3087, 56, 245, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[105426, 2982, 180, 4, 31, "Input"], Cell[105609, 2988, 40326, 706, 439, "Output"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[145984, 3700, 223, 3, 27, "Subsubsection"], Cell[146210, 3705, 327, 8, 31, "Input"], Cell[CellGroupData[{ Cell[146562, 3717, 198, 5, 35, "Input"], Cell[146763, 3724, 111, 1, 30, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[146911, 3730, 221, 5, 48, "Input"], Cell[147135, 3737, 116, 1, 30, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[147288, 3743, 157, 3, 31, "Input"], Cell[147448, 3748, 102, 1, 30, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[147587, 3754, 131, 2, 47, "Input"], Cell[147721, 3758, 113, 1, 30, "Output"] }, Open ]], Cell[147849, 3762, 444, 9, 35, "Text"], Cell[148296, 3773, 279, 5, 29, "Text"], Cell[CellGroupData[{ Cell[148600, 3782, 373, 11, 51, "Input"], Cell[148976, 3795, 108, 1, 30, "Output"] }, Open ]], Cell[149099, 3799, 411, 7, 29, "Text"], Cell[CellGroupData[{ Cell[149535, 3810, 138, 3, 47, "Input"], Cell[149676, 3815, 114, 1, 30, "Output"] }, Open ]], Cell[149805, 3819, 196, 2, 29, "Text"], Cell[CellGroupData[{ Cell[150026, 3825, 366, 9, 31, "Input"], Cell[150395, 3836, 858, 25, 71, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[151290, 3866, 406, 10, 31, "Input"], Cell[151699, 3878, 922, 26, 71, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[152658, 3909, 272, 6, 31, "Input"], Cell[152933, 3917, 733, 22, 71, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[153703, 3944, 222, 5, 31, "Input"], Cell[153928, 3951, 759, 22, 71, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[154724, 3978, 331, 8, 31, "Input"], Cell[155058, 3988, 992, 26, 71, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[156087, 4019, 279, 7, 31, "Input"], Cell[156369, 4028, 942, 26, 71, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[157348, 4059, 249, 6, 49, "Input"], Cell[157600, 4067, 399, 10, 48, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[158036, 4082, 146, 3, 31, "Input"], Cell[158185, 4087, 31390, 520, 243, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[189612, 4612, 230, 5, 31, "Input"], Cell[189845, 4619, 61166, 1051, 439, "Output"] }, Open ]], Cell[251026, 5673, 238, 3, 29, "Text"], Cell[CellGroupData[{ Cell[251289, 5680, 665, 15, 48, "Input"], Cell[251957, 5697, 1122, 30, 82, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[253116, 5732, 331, 8, 31, "Input"], Cell[253450, 5742, 1224, 31, 82, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[254711, 5778, 279, 7, 31, "Input"], Cell[254993, 5787, 1173, 31, 82, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[256203, 5823, 340, 8, 49, "Input"], Cell[256546, 5833, 673, 15, 51, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[257256, 5853, 146, 3, 31, "Input"], Cell[257405, 5858, 3605, 65, 243, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[261047, 5928, 232, 5, 31, "Input"], Cell[261282, 5935, 54375, 940, 439, "Output"] }, Open ]] }, Open ]] }, Open ]] } ] *) (* End of internal cache information *)